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(57) Abstract 

Asynchronous Transfer Mode Local Area Network (ATM LAN). The ATM LAN is implemented as a set of MAC entities 
which share a common group address space for the purposes of establishing multicast connections. Each station (10-0) has one or 
more ATM MAC entities (20-0, 20-1) per physical connection to an ATM network (11). The network ATM LAN service provides 
the station with ATM LAN configuration information needed for ATM MAC operation. Included in this information is the num- 
ber of ATM LANs the network has configured for that station. 
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VIRTUAL NETWORK USING ASYNCHRONOUS TRANSFER MODE 

BACKGROUND OF THE INVENTION • 

The present invention relates to networks and 
particularly to networks of computers that communi- 
cate data and other information. 

5 

Wide Area Networks . 

With the increased bandwidth available through 
transmission channels, for example increases from Tl 
to T3, and with the increase in bandwidth provided by 

10 broadband services such as SONET, larger enterprises 
are evaluating new applications which require higher 
speed communications. These new applications will 
dramatically enhance business productivity, but will 
require vastly improved network control and manage - 

15 ment facilities. However, neither private networks 
nor common carriers have fully addressed the emerging 
needs of the new communication environment. 

Computer Networks 

2 0 In the computer field, in order for users to 

have access to more information and to greater 
resources than those available on a single computer, 
computers are connected through networks . 

In a computer network, computers are separated 

25 by distance where the magnitude of the distance has 
a significant bearing on the nature of communication 
between computers. The distance can be short, for 
example, within the same computer housing (internal 
bus) , can be somewhat longer, for example, extending 

30 outside the computer housing but within several 
meters (external bus) , can be local, for example, 
within several hundred meters (local area networks, 
LANs) , within tens of miles (metropolitan area 
networks, MANs) or can be over long distances, for 

35 example, among different cities or different conti- 
nents (wide area networks, WANs) . 
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Multi-Laver Communication Architecture 

For networks, the communication facilities are 
viewed as a group of layers, where each layer in the 
group is adapted to interface with one or more adja- * 
5 cent layers in the group. Each layer is responsible 

for some aspect of the intended communication. The ,4 
number of layers and the functions of the layers 
differ from network to network. Each layer offers 
services to the adjacent layers while isolating those 

10 adjacent layers from the details of implementing 
those services. An interlayer interface exists 
between each pair of adjacent layers. The interlayer 
interface defines which operations and services a 
layer offers to' the adjacent layer." Each layer 

15 performs a collection of well-defined functions. 

Many multi- layered communication architectures 
exist including Digital Equipment's Digital Network 
Architecture (DNA) , IBM' s System Network Architecture 
(SNA) and the International Standards Organization 

20 (ISO) Open System Interface (OSI) . 

The ISO architecture is representative of multi- 
level architectures and consists of a 7 -layer OSI 
model having a physical link layer, a data link 
layer, a network layer, a transport layer, a session 

25 layer, a presentation layer, and an application 
layer. 

In the OSI model, the physical layer is for 
standardizing network connectors and the electrical 
properties required to transmit binary l's and 0's as 

3 0 a bit stream. The data link layer breaks the raw bit 
stream into discrete units and exchanges these units 
using a data link protocol. The network layer per- 
forms routing. The transport layer provides reli- 
able, end- to -end connections to the higher layers. 

35 The session layer enhances the transport layer by 
adding facilities to help recover from crashes and 
other problems. The presentation layer standardizes 



the way data structures are described and represent- 
ed. The application layer includes protocol handling 
needed for file transfer, electronic mail, virtual 
terminal, network management and other applications. 
In the n- layer multi- layer models, layers 1, 2, 
n are assumed to exist in each host computer. 
Layers 1, 2, n in one host computer appear to 

communicate with peer layers 1, 2, . . . , n, respec- 
tively, in another host computer. Specifically, 
layer 1 appears to communicate with layer 1, layer 2 
appears to communicate with layer 2 and so on with 
layer n appearing to communicate with layer n. The 
rules and conventions used in communications between 
the , peer layers are collectively known as, the peer 
level protocols. Each layer executes processes 
unique to that layer and the peer processes in one 
layer on one computer station appear to communicate 
with corresponding peer processes in the same layer 
of another computer station using the peer protocol. 

Although peer layers appear to communicate 
directly, typically, no data. is directly transferred 
from layer n on one computer station to layer n on 
another computer station. Instead, each layer n 
passes data and control information to the n-l layer 
immediately below it in the same computer station, 
until the lowest layer in that computer is reached. 
The physical medium through which actual communica- 
tion occurs from one computer station to another 
exists below the top layer n and typically below the 
bottom layer 1 . 

In order to provide communication to the top 
layer n of an n- layer network, a message, M, is 
produced by a process running in a top layer n of a 
source computer station. The message is passed from 
layer n to layer n-l according to the definition of 
the layer n/n-1 interface. In one example where n 
equals 7, layer 6 transforms the message (for .exam- 



pie, by text compression) , and then passes the new 
message, M, to the n-2 layer 5 across the layer 5/6 
interface. Layer 5, in the 7 layer example , does not 
modify the message but simply regulates the direction 
of flow (that is, prevents an incoming message from 
being handed to layer 6 while layer 6 is busy handing 
a series of outgoing messages to layer 5) . 

In many networks, there is no limit to the size 
of messages accepted by layer 4, but there is a limit 
imposed by layer 3. Consequently, layer 4 must break 
up the incoming messages into smaller units, prefix- 
ing a header to each unit. The header includes 
control information, such as sequence numbers, to 
allow layer 4 oh the destination computer to put the 
pieces back together in the right order if the lower 
layers do not maintain sequence. In many layers, 
headers also contain sizes, times and other control 
fields . 

Layer 3 decides which of the outgoing lines to 
use, attaches its own headers, and passes the data to 
layer 2 . Layer 2 adds not only a header to each 
piece, but also a trailer, and gives the resulting 
unit to layer 1 for physical transmission. At the 
destination computer, the message moves upward, from 
lower layer 1 to the upper layers, with headers being 
stripped off as it progresses. None of the headers 
for layers below n are passed up to layer n. 

Virtual Peer To Peer Communication 

An important distinction exists between the 
virtual and actual communication and between proto- 
cols and interfaces. The peer processes in source 
layer 4 and the destination layer 4, for example, 
interpret their layer 4 communication as being 
"direct" using the layer 4 protocol without recogni- 
tion that the actual communication transcends down 
source layers 3,2, l across the physical medium and 
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thereafter up destination layers 1 # 2, and 3 before 
arriving at destination layer 4. 

The virtual peer process abstraction assumes a 
model in which each computer station retains control 
5 over its domain and its communication facilities 
within that domain. 

Communication Networks Generally 

For more than a century, the primary interna - 

10 tional communication system has been the telephone 
system originally designed for analog voice transm- 
ission. The telephone system (the public switched 
network) is a circuit switching network because a 
physical connection is reserved all the., way . from end 

15 to end throughout the duration of a call over the 
network. The telephone system originally sent all 
its control information in the 4 kHz voice channel 
using in-band signaling. 

To eliminate problems caused by in-band signal - 

20 ing, in 1976 AT&T installed a packet switching 
network separate from the main public switched 
network. This network, called Common Channel Inter- 
office Signaling (CCIS), runs at 2.4 kbps and was 
designed to move the signaling traffic out-of -band. 

25 With CCIS, when an end office needed to set up a 

* 

call, it chose a channel on an outgoing trunk of the 
public switched network. Then it sent a packet on 
the CCIS network to the next switching office along 
the chosen' route telling which channel had been 

30 allocated. The next switching office acting as a 
CCIS node then chose the next outgoing trunk channel, 
and reported it on the CCIS network. Thus, the 
management of the analog connections was done on a 
separate packet switched network to which the users 

35 had no access. 

The current telephone system has three distinct 
components, namely, the analog public switched 
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network primarily for voice, CCIS for controlling the 
voice network, and packet switching networks for 
data . 

5 Future Communication Networks - ISDN 

User demands for improved communication services 
have led to an international undertaking to replace 
a major portion of the worldwide telephone system 
with an advanced digital system by the early part of 
10 the twenty- first century. This new system, called 
ISDN (Integrated Services Digital Network) , has as 
its primary goal the integration of voice and nonvoi- 
ce services. 

The investment in the current telephone system 
15 is so great that ISDN can only be phased in over a 
period of decades and will necessarily coexist with 
the present analog system for many years and may be 
obsolete before completed. 

In terms of the OSI model, ISDN will provide a 
20 physical layer onto which layers 2 through 7 of the 
OSI model can be built. 

Telephone Network Domains 

In a telephone network, the system architecture 
25 from the perspective of the telephone network is 
viewed predominantly as a single domain. When commu- 
nication between two or more callers (whether people 
or computers) is to occur, the telephone network 
operates as a single physical layer domain. 

30 

Communication Network Architectures 

Most wide area networks have a collection of 
end-users communicating via a subnet where the subnet 
may utilize multiple point-to-point lines between its 
35 nodes or a single common broadcast channel. 

In point-to-point channels, the network contains 
numerous cables or leased telephone lines, each one 
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connectiag a pair of nodes. If two nodes that do not 
share a cable are to communicate; they do so indi- 
rectly via other nodes. When a message (packet), is 
sent from one node to another via one or more inter - 
5 mediate nodes, the packet is received at each inter- 
mediate node in its entirety, stored there until the 
required output line is free, and then forwarded. In 
broadcast channels, a single communication channel is 
shared by all the computer stations on the network. 
10 Packets sent by any computer station are received by 
all the others. An address field within the packet 
specifies the intended one or more computer stations. 
Upon receiving a packet, a computer station checks 
the address field and if the packet is intended only 
15 for some other computer station, it is ignored. 

Most local area networks use connectionless 
protocols using shared medium where, for example, all 
destination and source information is included in 
each packet and every packet is routed autonomously 
20 with no prior knowledge of the connection required. 

In the above- identified application CONCURRENT 

MULT I - CHANNEL SEGMENTATION AND REASSEMBLY PROCESSORS 
FOR ASYNCHRONOUS TRANSFER MODE (ATM) an apparatus for 
concurrently processing packets in an asynchronous 

25 transfer mode (ATM) network is described. Packets 
that are to be transmitted are segmented into a 
plurality, of cells, concurrently for a plurality of 
channels, and the cells are transmitted over an 
asynchronous transfer mode (ATM) channel. Cells. 

3 0 received from the asysnchronous transfer mode (ATM) 
channel are reassembled into packets concurrently for 
the plurality of channels. 

Accordingly, there is a need for new networks 
which satisfy the emerging new requirements and which 

35 provide broadband circuit switching, fast packet 
switching, and intelligent network attachments. 



SUMMARY OF INVENTION 

The present invention is an Asynchronous Trans- 
fer Mode Local Area Network (ATM LAN) . The ATM LAN is 
implemented as a set of MAC entities which share a 
common group address space for the purposes of estab- 
lishing multicast connections. Each station has one 
or more ATM MAC entities per physical connection to 
an ATM network. The network ATM LAN service provides 
the station with ATM LAN configuration information 
needed for ATM MAC operation. Included in this 
information is the number of ATM LANs the network has 
configured for that station. 

In the present invention, a communication system 
includes an ATM network. The ATM network has a 
plurality of ports, each port having a unique port 
address . The ATM network includes one or more ATM 
switches for connecting sending ports to receiving 
ports . 

The communication system includes a plurality of 
stations, each station having a unique station 
address distinguishing the station from other sta- 
tions. Each station is connected to the ATM network 
at a port whereby source stations communicate with 
destination stations. Each station provides packets 
for transferring information, information including 
a destination station address, for addressing desti- 
nation stations. Each station includes a packet 
converter for converting between packets and cells 
for transfers between stations. .. 

The communication system provides address 
resolution for determining a port address corre- 
sponding to a destination station address . The 
address resolution includes multicast for multicast- 
ing the destination station address to a group of 
stations . 

The communication system provides manage- 
ment for requesting connections through the ATM 
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network connecting sending ports to receiving ports 
whereby packets are transferred from source stations 
to destination stations by cell transfers through ATM 
* network. 

5 ATM LANs may are extended by bridging several 

ATM LANs together using transparent MAC bridges and 
routers . 

Permanent virtual connections or switched 
virtual connections may underlie the layer manage - 
10 ment . 

The communication system operates with a 
multi- level architecture, such as the ISO architec- 
ture, and Logical Link Control (LLC) , Media Access 
Control. (MAC) and addressing functions are performed 
15 for ATM LANs . An ATM LAN provides support for the 
LLC sublayer by means of a connectionless MAC sublay- 
er service in a manner consistent with other IEEE 802 
local and metropolitan area networks. The ATM LAN 
interface is built on the user-to-network interface 
20 for ATM and adaptation layers. 

The communication system including the' ATM 
LAN provides the following benefits: 

Physical plug- in locations can be moved and 
changed without changing logical locations. 
25 The stations in the communication system are 

partitionable into multiple work groups. 

The communication system provides high bandwidth 

that supports multimedia applications including 

* ... ... .... . .. 

voice, video, real-time and time- sensitive applica- 
3 0 tions. 

The communication system integrates Wide Area 
Networks (WAN) and Local Area Networks (LAN) into one 
system. 

The foregoing and other objects, features and 
35 advantages of the invention will be apparent from the 
following detailed description in conjunction with 
the drawings . 
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BRIEF DESCRIPTION OF THE DRAWINGS 

FIG. 1 depicts a number of user stations con- 
nected together in an ATM network system. 

FIG. 2 depicts the multi- level protocol used to 
5 connect two or more stations in the ATM network 
system of FIG. 1. 

FIG. 3 depicts the network layer and the data 
link layer connected to a ATM interface in the ATM 
network system of FIGs. 1 and 2. 
10 FIG. 4 depicts details of the ATM MAC sublayer 

and the ATM interface for stations of FIGs. 1 and 2. 

FIG. 5 depicts details of the ATM LAN Server and 
the ATM interfaces of the network of FIGs. 1 and 2. 
* FIG. 6 depicts three ATM LANs configured on a 
15 three- switch ATM network. 

FIG. 7 is a representation of the details of the 
ATM MACs of stations SO, SI, S2 and S3 from FIG. 6. 
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DETAILED DESCRIPTION 
In FIG. 1, an ATM network system is shown in 
which two or more computer stations 10 are intercon- 
nected by an ATM network 11 for network communica- 
tion. The stations 10 include the station SO, SI, 
Ss designated 10-0, 10-1, 10 -s. The ATM 

network system of FIG. 1 employs, for example, the 
top six of the seven OSI model layers. The OSI model 
physical layer 1 is replaced with a ATM interface 
which operates in an asynchronous transfer mode (ATM) 
in accordance with the B-ISDN protocol. 

In FIG. 2, the ATM network 11 connects, by way 
of example, the SO station 10-0 to the SI station 10- 
1. The SO station 10-0 includes > the top six OSI 
layers, namely, the application layer [0, 7] , the 
presentation layer [0, 6] , the session layer [0,5] 
and the transport layer [0,4]. The layers 7 through 
4 in FIG. 2 are designated as the higher layers and 
operate in the conventional manner for the OSI model. 

In FIG. 2, the SO station 10-0 includes the 
network layer [0,3] and the data link layer, [0, 2]. 
The data link layer [0,2] includes the logical link 
control (LLC) sublayer and the media access control 
(MAC) sublayer. The MAC sublayer in the data link 
layer [0 f 2] connects to a ATM interface 13-0. The 
ATM interface 13-0 operates in accordance with the B- 
ISDN protocol defined by the CCITT. 

In FIG. 2, the SI station 10-1 has the higher 
layers including the application layer- ..[1, 7] , the 
presentation layer [1,6] , the session layer [1,5] and 
the transport layer [1,4] . The SI station 10-1 also 
includes the network layer [1,3] and the data link 
layer [1,2] that connects to the ATM interface 13-1. 
In FIG. 2, the ATM interface 13-0 for the SO station 
10-0 and the ATM interface 13-1 for the SI station 
10-1 connect to a ATM switch 13' in the ATM network 
11. The ATM interfaces 13-0 and 13-1 and ATM switch 
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13' operate in accordance with an ATM architecture 
for ATM communicationn. The ATM LAN communication is 
under control of an ATM LAN server 12 in the ATM 
network 11. 

5 In FIG. 2 each of the higher layers in the SO 

station 10-0 and in the SI station 10 -1 function in 1 
a well known manner in accordance with the OSI model. 
Also, the network layer [0, 3] in the SO station 10-0 
and the network layer [1, 3] in the SI station 10-1 

10 conform to the model OSI The data link layer [0,2 in 
the SO station 10-0 and the data link layer [1,2] in 
the SI station 10-1 have OSI compatibility. The 
compatibility with the OSI . model at the data link 
layer enables the ATM network system of FIGs. 1 and 

15 2 to be compatible with other local area networks and 
other networks that conform to the OSI model from 
layer [2] and above. Below the OSI layer [2] f the 
communication and connections are compatible with the 
B-ISDN model of the CCITT. 

20 The FIG. 2 communication network system is a 

hybrid of the OSI model above layer [1] and asynchr- 
onous transfer mode below the data link layer [2] . 

In FIG. 3, further details of the SO station 10- 
0 are shown and are typical of all of the other 

25 stations 10-1, , 10-s of FIG. 1. In FIG. 3, the 

higher layers 7, 6, 5 and 4 are conventional. 
Typically the higher layers of the station 10 -0 of 
FIG. 3 are implemented on a processor such as a Sun 
Workstation./ 

30 in FIG. 3, the network layer [3] uses any one of 

a number of standard protocols such as the IP proto- 
col 15, the DEC NET protocol 16, the OSI protocol 17 
or the XNS protocol 18 . Any other protocol can be 
implemented in the network layer 3 . 

35 In FIG. 3, the data link layer [2] includes the 

LLC sublayer and the MAC sublayer. The LLC sublayer 
includes the Logical Link Control (LLC) 19 which is 
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conventional in the data link layer of the OSI model. 

The data link layer [2] also includes the MAC 
sublayer which as a component of the data link layer 
[2] . The MAC sublayer typically may include other 
MAC sublayers in accordance with the standards IEEE 
802.3, 802.4, 802.5, 802.6 and 'FDD I". ATM LANs are, 
therefore, capable of interoperating with a wide 
variety of media. ATM LANs interoperate with all 
IEEE 802 Local Area Networks and Metropolitan Area 
Networks using transparent bridges and routers. 
Stations connected to ATM LANs communicate with 
stations connected to any IEEE 802 LAN or MAN via a 
bridge. 

In accordance with the present invention, the 
data link layer [2] also includes a new ATM MAC 
sublayer 22 analogous to the other MAC sublayers 23. 

-4- 

The ATM MAC sublayer 22 differs from the other MAC 
sublayers 23 in that the ATM MAC sublayer 22 communi- 
cates with the ATM switch 13 for ATM communication. 

In FIG. 3, the ATM MAC sublayer 22 includes one 
or more ATM MACs including, for example, ATM MAC 0, 
ATM MAC 1, ATM MAC M designated 21-0, 21-1, 

21-M respectively. Each of ATM MACs 21-0, 21-1,..., 
21 -m defines an ATM local area network (ATM LAN) . 
The ATM MACs of the ATM MAC sublayer 22 connect 
between the logical link control 19 and the ATM 
interface 13-0. The control of which of the stations 
(like the stations 10-0, 10-1,..., 10-s) are serviced 
by particular ones of the ATM MACs 21 of FIG. 3 is 
determined by the station management 20 within the 
ATM MAC sublayer 22. Other stations (or the same 
stations) may also be serviced by other local area 
networks such as Ethernet under control of the other 
MAC sublayers 23. 

In FIG. 3, the ATM MAC sublayer is capable of 
servicing the communication requirements of the 
stations 10-0 through 10-s of FIG. 1 in one or more 
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ATM LANs. Stations can be switched from one ATM LAN 
to another ATM LAN under control of station manage- 
ment 20 without requirement of modifying the physical 
connection to the station. For this reason, the ATM 
5 LANs are virtual LANs* 

In FIG. 4, further details of the ATM MAC 
sublayer 22 and the ATM interface 13-0 of FIG. 3 are 
shown. 

In FIG. 4 the ATM MAC sublayer includes the 
10 station management 20 and the ATM MACs including the 

ATM MAC 0, , ATM MAC M designated as 21-0, , 

21-M. 

In FIG. 4, the ATM MAC 0 includes the multicast 
address resolution 24, the uni cast address resolution 
15 25, the frame 26 and the connection management 27. 

In FIG. 4, the ATM interface 13-0 includes the 
signaling protocol 28 in the control plane, the ATM 
ADAPTATION LAYER (AAL) 29, the ATM layer 30 and the 
physical layer 31. 
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1 ATM LANs 
1.1 Introduction 

In FIG. 3, the higher layers [7,6,5,5] and [3] 
are conventional while the data link layer [2] in- 
cludes the LLC sublayer and the ATM MAC sublayer to 
implement the Asynchronous Transfer Mode Local Area 
Networks (ATM LANs). Such an implementation is 
provided with newly defined Media Access Control 
(MAC) including addressing protocols. The ATM LAN 
provides support for the LLC sublayer by means of 
connectionless MAC sublayer service in a manner 
consistent with other IEEE 802 local area networks 
(LAN) and metropolitan area networks (MAN) . The ATM 
LAN interface is built on the user-to-network inter- 
face for the ATM layer and the ATM adaptation layer 
(AAL) . 

An ATM LAN includes a set of MAC entities which 
share a common group address space for the purposes 
of establishing multicast connections. Each station 
has one or more ATM MAC entities per physical connec- 
tion to an ATM network. The network ATM LAN service 
provides the station with ATM LAN configuration 
information needed for ATM MAC operation. Included 
in this information is the number of ATM LANs the 
network has configured for that station. 

The user- to -network interface at the LLC and 
MAC levels is defined for the ATM LAN Architecture in 
a manner analogous to other Data Link Layer architec- 
tures . 

1.3 ATM LAN Functionality 

An ATM LAN has the following characteristics: 
addressing- all LANs connected by MAC 

bridges use 48 bit addressing 
unicast- all stations can send fra- 

mes to any other station in the 

LAN 
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duplication- 
broadcast - 



all stations can broadcast 
to every other station in a LAN 



frames are not duplicated 



multicast- 



any station can send to any 
group address and any station 
can register to receive frames 
for any group address 



promiscuity- 



any station may chose to 
receive all frames with group 
destination addresses 



1.4 ATM LANs 



An ATM LAN is a local network having a set of 



stations which share a common group address space for 
the purpose of establishing multicast connections. 
An ATM LAN is implemented using services of ATM LAN 
MAC, ATM signaling and ATM Adaptation Layers. 
Stations may participate in more than one ATM LAN. 
ATM LANs may be bridged together using MAC bridges. 

ATM LANs are sometimes called Virtual LANs 
because they are not limited by the limitations of 
any physical media characteristics. A single under- 
lying ATM network may support many ATM LANs. A 
station with a single ATM interface may be connected 
to many separate ATM LANs. There are no inherent 
limitations in the ATM LAN protocol itself to re- 
strict either the physical extent or the number of 
stations in a particular ATM LAN. Practical limita- 
tions, such as multicast traffic, usually limit the 
size and scope of ATM LANs. 

ATM LANs interoperate with a wide variety of 
media. ATM LANs can interoperate with all IEEE 802 
Local Area Networks and Metropolitan Area Networks 
using transparent bridges and routers. Stations 
connected to ATM LANs are able to communicate with 
stations connected to any IEEE 802 LAN/ MAN connected 
via bridge. 
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2 ATM LAN Architecture 

2 . 1 Overview 

An ATM LAN includes a set of procedures and 
5 protocols which work together to provide the services 
found in IEEE 802 LANs. The AAL and ATM protocols 
defined by CCITT are augmented by the ATM LAN MAC 
layer which maps unacknowledged MAC PDUs (MAC Proto- 
col Data Units) onto unacknowledged AAL PDUs trans - 
10 mitted over virtual connections provided by the ATM 
physical layer. The ATM MAC manages connections 
using an ATM signaling protocol. 

2.2 Logical Link Control 

Stations must comply with 802.2 Type I specif i- 
15 cation which is defined by ISO 8802. This includes 
mandatory response to XID (Exchange ID) and Test 
commands . 

When SNAP encapsulations are defined for upper 
layer protocols they are used. 
20 2.3 Station ATM LAN MAC 

Each station has one ATM LAN module per physical 
ATM interface. Each ATM LAN module provides MAC 
services via one or more ATM MAC entities . The ATM 
LAN server provides the ATM LAN MAC with config- 
25 uration parameters. 

2.3.1 ATM MAC Functions 

The ATM MAC layer provides the following func- 
tions: 

ATM LAN Configuration- determines the number 

30 of ATM LANs which have been 

configured for the station 
and the operational parame- 
ters needed to establish 
multicast connections for 

35 each ATM LAN. 

MAC PDU Framing- MAC SDUs (Service Data 

Units) are encapsulated in 
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10 



15 



20 



25 



30 



35 



Address Resolution- 



Connection Management - 



Multicast Service- 



m- 
an AAL specific framing. 

IEEE 802. 48 bit MAC 

addresses are mapped onto 
E.164 ATM addresses . 

establishes and rele- 
ases virtual connections 
for transmission of MAC 
PDUs (Protocol Data Units) 
and reception of frames ad- 
dressed to registered group 
(multicast) addresses . 

protocol and procedur- 
es are defined for trans- 
mission and reception of 
frames with group address- 
es. The network provides 
unreliable delivery via 
multicast service. The 
interface to the multicast 
service is AAL specific. 
The interface to be used is 
determined by configuration 
management . 

2.3.2 ATM MAC Entity Service Interface 

The ATM MAC entity provides the following 

service interface to MAC users. 

Primitive 

M_UNITDATA . request 



M UNITDATA. indication 



M_REGISTER_ADDRESS 
M_UNREG I S TER_ADDRE S S 
M_REGI STER_ALL 
M UNREGISTER ALL 



destination address 
source address 
mac service data unit 
destination address 
source address 
mac service data unit 
group address 
group address 



2.4 ATM Adaptation Layer 

The adaptation layers provide transmission and 
reception of frames on virtual connections . The 
standard CCITT AAL are used. In this application, 
AAL 3 is used to denote AAL 3/4 when end systems 
negotiate the use of the multiplexing identifier . 
AAL 4 is used to identify AAL 3/4 when the multiple- 
xing identifiers used are specified by the network. 
IEEE 802.2 LLC will be identified by a value of 1 in 
the protocol id field of AAL 3/4 frames. 

2.5 ATM Signaling Protocol 

The ATM LAN signaling protocol contains a subset 
of the functions in Q.93B. It provides the following 
services : 

o establishment of virtual connections (VCs) 

o negotiation of the upper layer protocol (ULP) 

o clearing of connections 

o dynamic port address assignment 

o user to network keep alive 

2.6 ATM LAN Server 

The ATM LAN server provides configuration and 
multicast services. It provides operational parame- 
ters for each ATM LAN in which each ATM station is 
configured. Membership in ATM LANs is controlled via 
policies implemented by the server. These policies 

¥ 

may vary between ATM LAN providers . The ATM LAN 
configuration protocol defines the information 
provided by stations with which servers may implement 
policies . Two policies which can be implemented are 
"port based configuration" and "station based config- 
uration" . The ATM LAN server may use the physical 
cabling to determine LAN membership. This is called 
"port based configuration". Alternatively, the ATM 
LAN server may use station MAC addresses to determine 
LAN membership. This is called "station based 
configuration" . The same station to server protocol 
is used in either case. The station is not affected 
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by the configuration policies implemented. When 
requesting ATM LAN configuration parameters, the 
station always provides its MAC address (es) . 

The station table shown below is an example of 
the station-based configuration for the system shown 
in FIG. 6. The port table shown below is an example 
of port -based configuration for the system shown in 
FIG. 6. 

STATION TABLE 
(VLAN MEMBERSHIP) 

VLAN MAC_ADDRESS 

VLAN1 MAC_Add[0] (SO) ,MAC_Add[l] (SI) ,MAC_Add[5] (S5) . . . 

VLAN2 MAC_Add[2] (S2) ,MAC_Add[6] (S6) . . . 

VLAN3 MAC_Add[0] (SO) ,MAC_Add£3] (S3) ,MAC_Add[4] (S4) . . . 

PORT TABLE 
(VLAN ASSOCIATION) 

Port Addresses Ts/pttl VLAN 

PA [2,2], PA [2,3], PA [2,4], PA [2,5] VLAN [3] 

PA [2,6], PA [2,7], PA [2,8], PA [2,9] VLAN [2] 



PA [2,3], PA [3,4] VLAN [3] 



Each station establishes a VC to an ATM LAN server 
for each physical interface. A well known group 
address is used. If redundant ATM LAN servers are 
providing configuration and multicast service, this 
service is transparent to the ATM station. The 
servers agree amongst themselves which ones will 
serve any particular station. The servers may elect 
to distribute responsibility for multicast service 
over several servers. This election is transparent 
to the station. 

3. ATM LAN Configuration Management 

A station may belong to one or more distinct ATM 
LANs. The station will then have been configured 
with one or more MAC entities each having a unique 
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MAC address . 

At power-on, the station establishes a VC to the 
network ATM LAN server. The station ATM MAC sends a 
configuration enquiry to the ATM LAN server. The 
5 enquiry contains the station's MAC address, alanjmac. 
' struct alan_req { /* configuration request */ 

u_char alan_proto; 
u_char alanjpdu_type ; 

u_short alan_seqnum; 
10 struct atm_addr alan_mac; 

}; 

Using the unique MAC address , alan_mac , the ATM 
LAN server determines the number of ATM LANs config- 
ured for that station and the configuration for each 
15 connected ATM LAN. A configuration response is sent 
to the station. 

struct alan_config { 

u_char alan_proto; 
u_char alanjpdu_type; 
20 u_short alan_seqnum; 

int alan_num_lans ; 

■ 

struct alan_parms alan_lan[]; 

}; 

The configuration response contains one alans_pa- 
25 rms per ATM LAN. For each ATM LAN the configuration 
manager activates an ATM MAC entity. The parameters 
in the alan_j?arms element control the configuration 
parameters of each ATM LAN "tap". 

Each ATM LAN 'tap'. is described by the .following 
3 0 parameters. The alan_config and alanjjpdate messages 
contain one or more alan parms structures, 
struct alan_parms { 

int alan_version; 
int alan_aal; 
35 struct atm_addr alan_jport; 

struct atm_addr alan_mcast_base; 
struct atm addr alan lan uid[] ; 
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int alan_num_mcast ; 

u_short alanjmid ; 

u_short alan_mtu; 

}; 

5 The alan_aal parameter specifies which AAL is used 

for multicast frames. Currently defined values are 
4 and 5 for AALs 4 and 5 respectively. The alan port 
is the port address from which VCs are setup for this 
ATM LAN. The ATM LAN server may specify different 

10 port addresses for different taps or may specify the 
same for all. The ATM MAC entity treats this E.164 
address as an unstructured bit string. 

The ATM LAN manager allocates a range of E.164 
group address space for each ATM LAN. The al- 

15 an_mcast_base is E.164 group address which is used in 
conjunction with alan_num_mcast (the number of group 
addresses allocated to the ATM LAN) to map IEEE 802.1 
group addresses onto the E.164 group address space. 
AAL and multicast service parameters are protocol 

20 specific. 

AAL multicast service requires that multicast AAL 
PDUs be transmitted using multiplexing identifiers, 
(MIDs) , provided by the ATM LAN server. This allows 
multicast service to be provided via replication 

25 functions often found in ATM switch fabrics. Each 
ATM MAC entity is assigned a LAN unique MID ' for 
transmission and must reassemble AAL using the full 
10 bit MID. 

Each ATM LAN is assigned a globally unique identi- ' 
30 fier, alan_lan_uid . This is a 128-bit name created 
by the ATM LAN server. The ATM LAN servier provides 
alan_parms structures for the requested MAC address- 
es. If the station requests configuration parameters 
for two MAC addresses which belong to the same ATM 
35 LAN, two identical alan_parms elements are returned. 

Once the ATM MAC entities have been created, the 
configuration manager periodically sends keep alive 
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frames on the configuration SVC. If the configura- 

* - 

tion SVC is released the configuration manager 
destroys the ATM LAN entities it created. If after 
some number of retries the ATM LAN server does not 
respond to keep alive packets, the configuration 
manager will release the configuration SVC and 
destroy ATM MAC entities. 

Configuration Acquisition Protocol State Machine 



State 


Event 


Actions 


Newstate 


Inactive 


Activate 


Setup Request 
Start timer Cl 


Wait for Setup 
Conf 


Wait for 
Setup Conf 


Release 
Ind 


Setup Request, 
Start timer Cl 


Wait for Setup 
Conf 




Setup 
Conf 


Config Request, 
Start Timer C2 


Wait for Setup 
Conf 


Wait for 
Setup Conf 


Timeout 


Config Request, 

Increment 

Retries 


Wait for Setup 
Conf 




Max 

retries 


Release, 
Setup Request 


Wait for Setup 
Conf 




Config 
Resp 


Activate 
MAC Entities 


Active 


Any state 
| Active 


Deactiv- 
ate 


Deactive active 
MAC entities, 
Release config- 
uration VC 


Inactive 




Release 
Ind 


Setup Request, 
Start timer CI 


Setup Request, 
Start timer Cl 



4. ATM LAN MAC 

The ATM MAC maps' IEEE 802 . 1 f lat 48 bit addresses 
to 60 bit hierarchical E.164 ATM addresses by the 
address resolution function. Individual IEEE 802. 
addresses are mapped into port addresses via the ATM 
Address Resolution Protocol, ATM ARP. Group IEEE 
802.1 addresses are mapped to ATM group addresses 
using a fixed algorithm. 

Once an ATM address is determined, the ATM signal- 
ing protocol is used to establish a virtual connec- 



tion. The connection is either a unicast connection 
or a multicast connection depending upon whether the 
ATM address is an individual or group address. 
Connection management is responsible for establishing 
and clearing these connections. 

Once the appropriate connection has been determined 
for a frame, it is encapsulated in an AAL specific 
encapsulation method. AAL 4 and AAL 5 have distinct 
multicast mechanisms due to the limitations of AAL 5. 
4 . 1 Framing 
4.1.1 AAL 3/4 

ATM LAN uses the same MAC framing as 802.6. ATM 
LANs use 48 bit MAC addresses to enable interoperab- 
ility with 802 LANs via MAC bridges. As shown in the 
following table, addresses are encoded as byte 
quantities as per 802.6. 



COM MCP HEAD 

PDU 

HEAD 


HEAD 
EXT 


LLC 


PAD CRC COM 
32 PDU 

TRAIL 




DEST SOUR MC 
ADR ADR BITS 




♦ 


4 


8 8 4 


0-20 


0-9188 


0-3 0,4 4 


Prot 
ID 


: Pad QOS 

LEN Delay 


Qos 

LOSS 


CRC Head 
Ind Ext 
Len 


Bridging 
(Not Used) 


6 


2 3 


1 


1 3 


16 


4.2 


Addresses 






* m 




Two types of add 


resses 


are used 


in an ATM LAN, 



station MAC addresses and ATM (or port) addresses. 

Both types of addresses may either be individual or 

- 

group addresses. 

MAC station addresses identify individual sta- 
tions connected to an ATM LAN. Station addresses are 
48 bit universally administered 802.1 MAC addresses. 
These MAC addresses enable interoperability with 



802. ID LAN MAC bridges. Station addresses are used 
as MAC frame source or destination addresses. 

MAC group addresses are used to address frames to 
multiple destination stations on an ATM LAN. Group 
addresses are used to set up virtual connections to 
multiple destination stations without knowledge of 
those stations ' individual addresses . They are used 
to provide multicast and broadcast services. Broad- 
cast is a a specific instance of multicast with all 
stations receiving frames with well defined group 
address, specifically all l's. Group addresses are 
48 bit universally or locally administered 802. MAC 
addresses. The group address with all bits set to 

* * t • 

one is the broadcast address. 

ATM Port addresses or port addresses or ATM 
individual addresses identify physical ports on 
switches. They are hierarchical 60 bit E.164 ad- 
dresses dynamically assigned by the network. Each 
virtual connection has a port address for at least 
one endpoint. Port addresses are . used in ATM ARP and 
Signaling PDUs. 

ATM group addresses (or multicast port address- 
es) identify an ATM level multicast group. They are 
used in signaling PDUs . 



ATM port 11 Ox no padding 60 bits 



ATM group lllx no padding 60 bits 

address 

MAC station 1000 12 bits 48 bits 

address 

MAC group 1000 12 bits 48 bits 

address 

x - indicates whether the address is publicly or 
privately administered 

4.3 Multicast Service 
4.3.1 Background 

Any station on the LAN can register to receive 
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frames addressed to specific group addresses* All 
stations register to receive frames addressed to 
group address FFFFFFFFFFFF which is defined to be the 
broadcast group address. Any station can send frames 
5 to any group address without the knowledge of which 

stations want to receive them. V 
4.3.2 ATM LAN Multicast 

In an ATM LAN, multicast capability is provided 
by the multicast server which is part of the LAN 

10 server. Stations use that service by establishing 
virtual connections to the server using the multicast 
base ATM address provided in the configuration 
parameters (alan_parms) . The multicast base address 
is a privately administered group E.164 address. 

15 Virtual connections with a group ATM address at one 
endpoint are multicast VCs. When setting up a 
multicast VC the station may request transmit only 
access so that it will not receive frames transmitted 
on that VC. 

20 IEEE 802.1 48 bit addressing provides for up to 

2** possible group addresses all registered by various 
stations in one LAN. Few ATM networks could support 
2** virtual connections. To bridge this gap in 
service offering and network capability, each ATM LAN 

25 is configured to support a small (typically 100s) 
number of multicast circuits. This number is export- 
ed in the alan_parms configuration element. Each ATM 
MAC entity is also provided with a multicast base 
address which is treated as a 64-bit integer. These 

30 two numbers are used to map many 4 8 -bit IEEE group 
addresses to fewer ATM group addresses which are then 
used to setup multicast connections. if al- 
an_num_multicast is zero, then the 48 -bit group 
address is added to alan_ mcast_base . Otherwise the 

35 48 -bit group address is treated as a 16 most signif- 
icant bits of the 48-bit group address are Exclusive- 
Ored into the 32 least -significant bits, the result 
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is divided by alan_num_mcast and the resulting 
remainder is added to alan_mcast_base . In either 
case, the result value is used as a group address to 
set up a multicast connection for that group address. 

4.3.3 Registering for a group address 

Each ATM MAC entity maintains a list of group 
addresses for which its users have requested it 
receive frames. Each of these group addresses is 
mapped onto a ATM group address when the MAC entity 
is given is alan parms information, that is, when it 
becomes active. There after, the ATM MAC entity will 
maintain a multicast connection for each port address 
derived from the above computations. Note, several 
MAC group addresses may map onto one group port 
address. In this case, only one connection is main- 
tained for those MAC group addresses. If the network 
releases a multicast connection, the ATM MAC entity 
will re-establish another one. 

The ATM MAC entity will always maintain a multic- 
ast connection for the group port address derived 
from the broadcast MAC address. 

4.3.4 Transmission of Multicast MAC PDUs 

When an ATM MAC entity is presented with a 
MJCJNITDATA. request with a group destination address 
it . maps the group MAC address to the group ATM 
address, and transmits the MAC PDU on the connection 
established to that port address. If no connection 
is already established, the frame is queued until one 
is established. Multicast .connections setup solely 
for the transmission of multicast PDUs are aged in 
the same fashion as those setup for unicast PDUs. 

4.3.5 Reception of Multicast MAC PDUs 

The group destination addresses in received MAC 
PDUs are checked against the list of registered group 
addresses. If the group addresses are not regis- 
tered, the frame is dropped. This dropping is 
necessary because transmitters may map MAC group 
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addresses onto a multicast connection established to 
register other group addresses. 

All group addressed frames are not received on 
corresponding multicast connections. Stations 
listening for multicast frames must be prepared to 
receive those frames on either the appropriate 
multicast VC or the broadcast VC. 

4.3.6 Unregistering a group address 

Multicast connections established for registered 
group addresses are not aged. They are not released 
until the last MAC service users want to receive 
frames addressed to any of the group addresses mapped 
onto that connection. 

The ATM MAC entity maintains reference counts on 
the number of MAC service users which have registered 
a group address. A reference count on the multicast 
connection is maintained for each MAC group which 
maps onto the connections group ATM address. 

4.3.7 AAL 4 Multicast Service 

Stations connected to multicast VCs can receive 
frames from many sources simultaneously. The multi- 
plexing identifier (MID) in the ALL4 SAR header is 
used to correctly reassemble these frames. MIDs are 
unique within a given ATM LAN. The LAN server 
assigns a unique MID to each port address. 

Up to 1023 stations may be connected to an ATM 
AAL 3/4 LAN. Each station has a globally unique 48- 
bit address per ATM LAN. Each station is assigned 
one MID per ATM LAN (local port address to the 
station) to be used when transmitting frames on 
multicast VCs. Stations may not transmit more than 
one frame simultaneously on multicast VCs with the 
same local port address. Each station implements MAC 
level address filtering for frames received on 
multicast VCs. 

Each station has a multicast filter which is used 
to filter frames received on broadcast VCs . This 
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filter may be implemented in hardware or software. 
The filter is necessary because each ATM network 
provides limited multicast service and stations may 
broadcast unicast frames. 
4.3.8 AAL 5 Multicast Service 

AAL 5 does not provide for multiplexing frames on 
a single VC simultaneously. The mid field in the 
alan_parms structure is ignored. There is no limit 
on the number of stations (or ATM MACs) which may 
belong to an AAL 5 ATM LAN. 
4.4 ATM Address Resolution Protocol 

Individual IEEE 802.1 MAC addresses are mapped 
into port addresses via the ATM Address Resolution 
Protocol .. (ATM ARP) . Once the port address is deter- 
mined the ATM signaling protocol is used to establish 
a virtual connection. 
4.4.1 ATM ARP Operation 

Stations connected directly to ATM LANs will, 
conceptually, have address translation tables to map 
MAC addresses (both station and group addresses) into 
virtual connection identifiers. The MAC- to-port 
table, provides mappings from MAC addresses to port 
addresses . 

The MAC transmission function accesses this table 
to get next hop port address given destination 
station address. This table is updated when new 
station address to port address mappings are learned 
via ATM ARP and when MAC group address to ATM group 
address mappings are computed. The entries in the 
MAC to port table are updated when ATM ARP requests 
and replies are received. 

When the MAC layer is presented with a frame for 
transmission, it looks up the destination address in 
the station to port address table. If an entry is 
found, connection management selects the appropriate 
virtual connection upon which the frame should be 
transmitted. 
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If no entry is found, a new entry is allocated 
for that MAC address. If the MAC address is a group 
address, an ATM group address is computed using an 
AAL specific function. This operation permits the 
5 broadcast VC to be established without sending ATM 

ARP requests. Mapping individual MAC addresses to s 
port addresses is accomplished by broadcasting an ATM 
ARP request for the MAC addresses to all stations 
connected to the ATM LAN. The ATM ARP request 

10 carries the senders MAC and port address mapping. 
All stations receive the request. The station with 
the specified MAC address responds with an ATM ARP 
reply. The responder updates its MAC- to-port table 
using the information in the request. The reply 

15 carries both the responders' and the requestors MAC 
and port addresses. When the requestor receives the 
ATM ARP reply, it updates its port-to-MAC address 
table . 

20 MAC to Port entry 

Station Address 4 8 Next Hop Port Status 
Bit 802.1 MAC Address E.164 

25 The requesting station must transmit MAC frames 

on broadcast connections until it receives responses 
to its ATM ARP requests. It may then set up a 
connection using the port address in the reply. 
Usually, the responder sets up the connection before 

3 0 replying. 

The ATM ARP function times out entries in the 
MAC- to-port table when they have been idle for some 
time. Connection management is notified when entries 
in the MAC- to -port table are added, updated or delet- 
35 ed. Connection management notifies ATM ARP when 
connections are established and released. Entries in 
this table are deleted when an SVC establishment to 
the port address fails. They are deleted when the 
connection corresponding to an entry is released. 
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TABLE. 5: Port to VPI-VCI entry 

Local Port Peer Port OPS VPI/VCI 
Address Address 

5 

4.4.2 ATM ARP PDUs 

ATM ARP requests and replies are encapsulated in 
802.2 LLC and the appropriate AAL for the connection 
upon which they are sent. ATM ARP requests are 

10 always broadcast. Therefore they are encapsulated in 
the AAL used for multicast connections. ATM ARP 
replies are usually sent on point to point connec- 
tions. The ATM MACs negotiate the AAL to be used for 
that connection. The reply is then encapsulated in 

15 802.2 LLC and the specific AAL framing. 

The ATM ARP messages are: 

/* 

* ATM Address Resolution Protocol. 
*/ 

20 struct atm_arp { 



u_short 


aa_llp; /* lower layer protocol 


*/ 


u_short 


aa_ulp; /* upper layer protocol 


*/ 


u_char 


aa_llp_len; 




u_char 


aa_ulp_len; 




u_short 


aa_msg_type ; 




u_char 


aa_sende report [8] ; 




u_char 


aa_sender_mac [6] ; . 




u_char 


aa_target_port [8] ; 




u_char 


aa_target_mac [6] ; 





30 }; 

/* aa_msg_type ' s */ 
#define ATM_ARP_REQUEST 1 
#def ine ATM_ARP_REPLY 2 

35 The aa_ulp_len and aa_llp_len fields are always 

6 and 8 respectively. The aa_ulp field is set to 16. 
The sender mac and port addresses are set to the 
sender's Mac and Port addresses for request and 
non-proxy reply messages. The aa send_mac field in 
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proxy replies contains the aa_target_mac from the 
corresponding request. The aa_target_mac is always 
set to the Mac address needing resolution in requests 
and it is set to the requestor's Mac address in 
replies. The aa_target_port is undefined in requests 
and in replies it contains the aa_sende r_port from 
the corresponding request. The recipient of a reply 
verifies that the aa target port corresponds to one 
of its own port addresses. 
4.5 Connection Management 

Once a MAC address has been resolved to a ATM 
address a connection to the station receiving frames 
for that MAC address can be set up and those frames 
can be transmitted directly to that station rather 
than broadcast. Connection management is responsible 
for defining the connection establishment and release 
policies. The ATM signaling protocol is used to 
establish connections for ATM LAN MAC frames. A 
specific upper layer protocol identifier is reserved 
for ATM LAN MAC frames . 
4.5.1 Connect Establishment 

Connections are established when ah Unacknowl- 
edged Data Request needs to be transmitted to a MAC 
address for which a MAC- to- ATM address mapping is 
known, but no connection to that ATM address, is 
established (or emerging) . It is possible for two 
MAC entities to simultaneously establish connections 
to each other. When connection management receives 
connection setup SDU from ATM signaling, it checks to 
see if a connection to the peer port address already 
exists. If another connection exists (or is being 
established) , the connection initiated from the lower 
port address is released. Thus there will never be 
more than one connection established between two ATM 
MAC entities. 

While a connection is being setup, frames which 
would be transmitted on that connection once it is 
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established must be queued or dropped. Frames should 
not be broadcast. At least one frame must be queued. 
Implementations may chose to queue more. Once the 
connection is set up, any queued frames are transmit- 
ted. The first frame transmitted on a connection 
initiated by a station must be the ATM ARP response 
for the an ATM ARP request. 

4.5.2 Quality of Service 

Currently, distinct qualities of service may be 
defined for ATM MAC PDUs . 

4.5.3 Connection Release 

Connections for which there is no MAC- to- ATM 
address mapping are held for the product of the 
number of ATM ARP retries and retry interval and then 
released. The MAC- to -ATM address mappings are aged 
separately. 

When ATM ARP deletes all the translations to a 
specific ATM address, all connections to that ATM 
address are released . 

When a connection is released, the ATM ARP 
function deletes all MAC to ATM translations for that 
connection's remote ATM address. 

4.6 Frame Reception 

Frame Reception Stations are responsible for 
performing filtering of incoming frames. Unicast 
addressed frames for other stations will be received 
on the broadcast VC. Multicast frames for unregis- 
tered multicast addresses may be received on multic- 
ast VCs ... These frames are not passed -up to the MAC 
service user. 

4.7 Address Resolution and Connection Establishment 
Example 

In this example, the steps are described that are 
required for one station, called Lyra, to deliver a 
MAC UNI TD ATA SDU to another station, called Altera, 
assuming neither station has had any prior communica- 
tion. It is assumed that both stations are part of 
the same ATM LAN. These steps are only required for 



the initial transmission from Lyra to Altera. Addi- 
tional MAC PDUs may be transmitted on the connection 
setup by these steps until either station decides it 
no longer wishes to maintain the connection. In this 
example, MAC addresses are expressed in xx:xx:xx:xx- 
:xx:xx form where each pair of hex digits, xx, is one 
octet for the address. Port addressees are expressed 
in the same form except that they have 8 octets . 

o An ATM MAC service user on Lyra provides the ATM 
MAC with an UNITDATA SDU to be sent to station 
address 00:80:b2:e0:00:60. The MAC consults its MAC 
to port address table, but finds no translation. 

o The MAC creates an ATM ARP request for MAC 
address 00 : 80 :b2 :e0 : 00 : 60 . The request contains 
Lyra's own MAC and port addresses, 00 : 80 :b2 : eO : 00 : 50 
and dl: 41: 57: 80: 77: 68: 00: 02 respectively. The ATM ARP 
is encapsulated in LLC/SNAP. The destination MAC 
address is f f : f f : f f : f f : f f : f f (the broadcast address) . 
The ATM MAC recursively invokes itself to transmit 
the ATM ARP request. 

o The MAC address to port address table is search- 
ed for the broadcast MAC address and the correspond- 
ing port address is obtained, f 1 :41 : 57 : 80 : 77: 68 : 01: - 
01. The station established a connection to this port 
address when the. ATM LAN MAC- entered the active 
state. The ATM ARP PDU is encapsulated in an 802.6 
frame and passed to the AAL 4 function along with the 
MID associated with this ATM MAC entity for transmis- 
sion of that multicast connection. 

o The MAC must transmit the MAC SDU. In lieu of a 
valid MAC address to port address mapping the broad- 
cast MAC to port mapping and associated connection 
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are used. The MAC SDU is encapsulated in an 802.6 
frame and passed to the AAL 4 function with the MID 
associated with this ATM MAC entity for transmission 
of that multicast connection. 

All the above took place on Lyra. The subsequent 
steps take place on Altera as it receives the ATM ARP 
and the ATM MAC PDU containing user data. 

o The ATM ARP is received by all MAC entities 
10 including Altera. The other MACs determine that the 
requested MAC address is not theirs and ignore the 
request. Altera determines that its MAC address is in 
the request. Altera updates its MAC to port address 
table with Lyra's MAC and port addresses provided in 
15 the ATM ARP request. Next" an ATM ARP reply is con- 
structed using Altera 's port and MAC addresses. This 
request, in the form of an MAC SDU with Lyra's MAC 
address as the destination, is passed to the ATM MAC 
entity. 

20 

o The ATM MAC looks up Lyra's MAC address in the 
MAC to port address table. It finds Lyra's port 
address. The port to VCI table is searched using that 
port address. No entry is found. Connection manage- 

2 5 ment is invoked to establish a connection to Lyra. 

Connection management passes a SETUP request to ATM 

* * 

signaling. The MAC queues the ATM ARP response until 
the connection is established. 

3 0 o Altera ATM signaling module sends a SETUP PDU to 

establish a connection to port address dl: 41: 57: 80: - 
77:68:00:02. The upper layer protocol (sometimes 
called upper layer compatibility) is the ATM LAN MAC. 
(This is not a function of the ATM MAC. But it is 
35 included for illustrative purposes.) 

o Next all stations receive the MAC SDU containing 
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the user data on the broadcast connection. All sta- 
tions except Altera determine that the destination 
MAC address is not theirs and drop the frame. Altera 
accepts the frame strips off the 802.6 and LLC/ SNAP 
overhead and passes the frame up to the user function 
identified by LLC/SNAP. 

At this time, the SDU provided to Lyra's ATM MAC 
has been delivered to the appropriate MAC user on 
Altera. However, the MAC entities continue connec- 
tion establishment and address resolution for subse- 
quent communications between the two stations. The 
next sequence of operations occurs on Lyra. 

o ATM signaling on Lyra receives a connection setup 
indication from the network. This indication is 
passed up to the upper layer protocol which in this 
instance is the ATM MAC. 

o The ATM MAC receives a setup indication SDU "from 
signaling. At this point Lyra knows some other 
station's ATM MAC is trying to setup a connection to 
it. The port to vci table is searched for a connec- 
tion to the callers port address. In this case none 
is found. The connection is accepted by passing a 
CONNECT SDU to ATM signaling. The MAC starts an idle 
timer for the connection. Note, that the ATM MAC can 
not use this connection until an ATM ARP request or 
response is received indicating MAC addresses for 
stations accessible via the connection. 

o Lyra's ATM signaling transmits a CONNECT PDU to 
the network. Typically, network communication is 
bi-directional. Assuming this is the case the MAC 
service user on Altera has responded to the MAC SDU 
indication with a MAC SDU request. The following 
actions take place on Altera. The ordering of the 
arrival of MAC SDU and the CONNECT SDU are arbitrary. 
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o The MAC service user passed the ATM MAC an SDU 
with a destination MAC address of 00 : 80 :b2 : eO : 00 : 50 
(Lyra's) . The MAC finds the mapping from MAC address 
to port address learned when the ATM ARP request was 
5 received from Lyra. The MAC next finds that it is 
setting up a connection to Lyra's port address and 
that the connection is not yet established. A MAC PDU 
is created from the MAC SDU and queued waiting 
connection establishment . 

10 

o Altera ATM signaling receives a connect PDU. This 
is passed up to the MAC as a SETUP confirmation. The 
ATM signaling sends a CONNECT acknowledge PDU to 
Lyra. The connection is considered established. 

15 

o Altera' s ATM MAC, upon receiving the SETUP 
confirmation, transmits all frames which were queued 
awaiting connection establishment. The ATM ARP reply 
is the first frame to transmitted. It is followed by 

20 the MAC PDU containing user data. 

At this TIME, address resolution and connection 
are complete on Altera. Any further frames addressed 
to Lyra's MAC address will use the new connection. 
The connection is not established on Lyra. Also Lyra 

25 still does not have a mapping for Altera' s MAC 
address. The following actions complete address 
resolution and connection establishment on Altera. 

o The ATM ARP reply is received on the connection 
30 which is still being setup. (Note most ATM networks 
have slower signaling channels than payload channels. 
Typically the ATM ARP response will be received prior 
to the CONNECT acknowledge PDU.) 

35 o The MAC enters Lyra's MAC address to port 

address mapping in the MAC to port table. At this 

« • • ■ 

point any MAC UNIT-DATA requests will be queued until 
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the SETUP complete indication for the connection is 
passed up from ATM signaling. 

o The MAC PDU containing user data from Lyra % s MAC 
5 users is received. The 802.6, LLC and SNAP headers 
are removed and a MAC UNITDATA indication is passed 
up to the appropriate MAC service user. 

o Altera' s ATM signaling receives a CONNECT_ACK 
10 PDU. This moves the connection into established 
state. The ATM signaling function passes up a SETUP 
COMPLETE indication informing the ATM MAC it may 
transmit on the connection. Connection management 
starts its idle timer for the connection. 
i5 The connection is now established on both sta- 

tions. One or more MAC UNITDATA SDUs have been deliv- 
ered. The connection will be timed out as per local 
policy decisions. 

20 ATM LAN Code Overview 

One detailed embodiment of computer software code 
used in connection with the present invention appears 
in the VIRTUAL NETWORK USING ASYNCHRONOUS TRANSFER 
MODE APPENDIX. 

25 The ATM LAN MAC code in the appendix is organized 

by functional components and Operating System (OS) 
dependencies. The file if_atm.c contains the rou- 
tines which contain OS dependencies and which are 
■,. typically implemented differently for each. OS The 

JO unicast unit 25 and multicast unit 24* address resolu- 
tion functions are implemented in the file atmarp.c. 
The file atmarp.h contains the definitions for the 
ATM ARP protocol and the structures used by atmarp.c 
to implement the protocol. The file atm.c implements 

15 the function of connection management unit 27. Those 
routines interact with the ATM signaling function to 
establish and release connections. The framing unit 
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26 function is implemented in the OS specific file 
if_niu.c in the routines niuoutputO , atm_mac_input ( ) 
which encapsulate and decapsulate frames respective- 
ly. The station management unit 28 functions are 
5 implmenented in atm_init.c and in parts of the ATM 
signaling unit 28 in the files svc.c, svcjjtl.c and 
svc pdu . c . The ATM LAN server unit 12 functions are 
implemented in the files lm.c, lm_cf g. c , Irrwngmt.c 
and lm_util.c. 

10 In the APPENDIX the configuration management 

units 20 and 40 are implemented in an alternate 
embodiment wherein the operational unit 28 PDUs 
rather than in a switched VCs as previously describe- 
d. 

15 While the invention has been particularly shown 

and described with reference to preferred embodiments 
thereof it will be understood by those skilled in the" 
art that various changes in form and details may be 
made therein without departing from the spirit and 

2 0 scope of the invention. 
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atmx 
/* 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

* This file contains: atm_InitO « called at initialization. 

* atm_find_atpO returns an atmif given a MAC and physical l/f. 

* atm_flntjmac() returns an atmtf given a MAC. atm_sdu_hand!er() Is 

* the interface to ATM signaling, atm releaseQ releases a VC and 

* frees any queued packets* atm_find* atO searches for an arptab 

* entry given a mac address, atm initiate setupO Initiates VC 

* establishment 

V 



static char sccsidfl = "%A%"; 

#lndude "atm.h' 
#lnclude "svch" 
#lnclude "debug.h" 
#lnclude 9 n\u.h m 
#lnclude "atmarp.h" 
#include Tlc.h - 
#include "ifjatm.h" 

Int atm trace = 2; 

#define TL1 T 
#define TL2 atm_trace > 1 
#define TL3 atm Jrace > 2 
#d ef ine TL4 atmjrace > 3 
#define TL5 atm_trace > 4 

Int atm_assert_panic - 1; 

#define HASHMA(x) HASHLOW((x)->aa long[1]) /* pass in a atm addr */ 
#define HASH_LOW(part0) (((partO> >8)^part0))&0xf) /* pass in low 32 bits 

* of addr */ 

/* 

* atmJnitO is called to allocate atm glob which contains all the 
*^ATM LAN MAC global variables wFich are written after program load. 

atm inftO 
{ " 

int i f atnwnacJnputO, atm_sdu handlerO; 

struct atm_globs *ag = atm_glob; 

If (ag->atm_lnltialized) 
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.... ^ 

return 0; 
ag->atmifn = NNIU * NATMS; 

ag->atm_uip = ulp_register(LMI_MAC_ORG, LMI_MAC_PID, 

atm mac Input, atm_sdu" handler, 0); ~ 
((u_short *)""& acp>ilc_def)[OJ = Oxaaaa; 
((u~short *) & ag->tlc def)[1J « 0x0300; 
((u"short *) & ag->llcfdef)[2] = 0x0; 
((u_short *) & ag->llc_def)[3] = 0x0; 
ag^atnwuilLaaJonglOJ = 0; 
ag->atm_nuIl.aaJong[1] = 0; 
ag->atm_null.aa_type = AAT_NULL; 
ag->atm_broadcastaajong(0] = 0; 
ag->atm"broadcast.aa long[1] = 0; 
ag->atnrTbroadcast.aa~type » AAT MAC; 
for (i m 0; I < 6; " 
ag->atm broadcast aa byte[ATM FIRST MAC + i] - 
(u_cha7) Oxff; 
ag->atmjnitialized = 1; 
return; 



r 

* atm_find_atpO returns an ATM LAN structure pointer, atp, given a 

* port address and a phys i/f. 
V 

staict atmif * 
atm_find_atp(pc, port) 

struct pcif *pc; 

struct atm addr *port; 

{ 

struct atmif *atp; 

for (atp = pc->pc atmif; atp; atp = atp->ati next) 
if (ATM_ADDRjrQ(atp->ati_port, *port)) 
return atp; 
return (struct atmif *) 0; 

> 

/* 

* atm flnt_atO returns a pointer to an atm interface entry to be 

* used for a specific MAC address. 

V 

struct atmif * 
atm_find_mac(mac) 
u char *mac; 

struct atm_addr addr; 
struct pcif *pc; 
struct atmrf *atp; 
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atm_bzero(&addr, sizeof(addr)); 
atnTbcopy(mac f &addr.aa byte{2], 6); 
addi\aa_type = AAT_MACf 

for (pc = svc_glob->svc_pcff; pc < svcjjiob->svc pclfn; pc++) 
for (atp = pc->pc_atnriif; atp; atp = atp->atl next) 
tf (ATM_ADDR_EQ(atp-> atl_mac f addr)) 
return atp; 
return 0; 

} 

/* 

* atm_sdu handlerO handles signaling SDUs from the ATM signaling 

* module. The necessary ATM ARP routines are called at connection 

* estabiishement and release. 

V 

atm_sdu_handler(vp, sdu, len) 
struct vcte *vp; 
struct setup *sdu; 
int len; 

{ 

struct ulptab *ulp; 
int rtn; 

struct vcte *ovp; /* other VC */ 

ASSERT(VAU D_VP (vp)) ; 
TR1(TL2, "atm_sdu_handler(%s)\n", 

svc_xdu_type_str(sdu->lmij*du_type)); 

if (vp->vctejlags & VCTEF MCAST SERVER) { 
if (Ulp = ulp find(LMI MCAST PID, LMI MCAST ORG)} { 

ASSERT(\7AUD_ULP(vp->vae_ulp)); " 

ulp_free(vp- > vcte_ulp) ; 

ulp_tax(ulp); 

vp->vcte_uip = ulp; 

(*ulp->ulp Imi) (vp, sdu, len); 
} else 

atm_release(vp, 1NVAUD_DST_ADDR); 
return; 

} 

switch (sdu- > Imi pdu type) { 
case SDU SETUPJND: 
if (Isvc ?!ndJocal_port(vp->vcte pcif, 

£ ((struct setup *) sdu)->lmi callee)) { 
atrn/eiease(vp, INVAUD DSTADDR); 
break; 

} 

ASSERT(vp->vcte atmif == 0); 
vp->vcte_atmif = atmfind atp(vp->vcte_pcif, 

&vp- > vcte local) ; 
ASSERT(VAUD_ATP(vp->vcte_atmif)); 
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ovp « svcjind_vc(vp->vctej)cif. &vp->vcte local, 
&vp-">vcte peer, atm glob->atm ulp, " 

vcs not^ceadjdr Dying & -ft < < vcs wsr)); 

if (ovp &£ bcmp (&vp- > vcte Jocal, 

vp->vcte_peer, sizeof (struct atm_addr)}) { 
If (atmJncomingj/cJs_better(vp, ovp)) { 

arp 7elease(ovp->^cfe atmif->atl_arptab f ovp); 

atnT release(ovp, VC jfEDUNDANT) ; 
> else! 

atmjree_msg(sdu); 

atm""release(vp, VC_REDUIMDANT); 

break; 

} 

} 

sdu->lmi_pdu type = SDU SETUP RESP; 
If (rtn = svc s3 u (vp- > vctejpcrf , vp/sdu. 
sizeoffetruct setup))) 
TR1(TL2, - svc_sdu(SETUP_RESP)->%d\n ,, l rtn); 
break* ~™ 
case SDU SETUP_COMP: 
if (bcmpfavp->vcte local, vp->vcte_peer, 
stzeof(struct atnfaddr))) 
arp setup(vp->vcte_atmif->ati arptab, vp); 
case SDll_SETUP_CONF: • 
atm_f ree_msg(sdu) ; 
if (vp->vcte packet) 

atm_sencT packets(vp) ; 
break; 

case SDU_RELEASE IND: 
if (vp->vcte_packet) 

atm_free_packets(vp) ; 
arpj-eTease(vp->vcte_atmif->ati_arptab f vp); 
atm_free_msg(sdu); 
break; 

case SDU_STATUS_RESP: 

atm_free_msg(sdu); 

break; 
default: 

pantefunknown sdu"); 

break; 



atmjncomlng vcjs better© choses the better VC given two 
redundant VCs. We Omit the number for VCs to one between every 
pair of ports. When a new VC Is initiated we check for a 
duplicates. The VC initiated by the station with the lowest port 
address is released. It is imperative that both sides use this 
algorithm otherwise we could end up in a deadly embrace. 
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V 

atmJncoming_vc is better(lvp t ovp) . 
struct vcte *ivpf/* incoming VC */ 
struct vcte *ovp; /* outgoing VC (we initiated) */ 

{ 

struct atm addr *ours, *thefrs; 
int " true; 

ASSERT(ovp 1= Ivp); 

TR2(TL3, "atm sdu handler dup vcs found %x & %x\n\ ivp, ovp); 
if (ivp->vctejicif->l>cjags & PCIFJflUJ"0_NIU) { 
/* compare MAC addresses */ " 

true - ivp->vcte_pcif->pcjlags & PC!F_OTHER_MAC_ADDRJS_HIGHER; 
} else { /* compare port addresses */ " ~ ~ 

true = ATM ADDR GT(ivp->vcte peer, ivp->vcte local); 
} ~ 

TR2(TL3, 'atm incomingjfcJs^s^^betterC&s) \n", 
true ? ~ : "jnof, el60_ntoa(&ivp->vcte_peer)); 
ASSERT(ovp); /* keep ovp alive */ 
return true; 



/* 

* atmjreleaseO sends a release_req to the svc module and frees any 

* queued packets. 

V 

atm_release(vp, cause) 
struct vcte *vp; 

struct release *rdu; 
int rtn; 

if (vp->vcte_packet) 
atm_f ree_packets(vp) ; 

if (!(rdu = (struct release *) atm_allocjnsgO)) { 
printffatmj-elease: no memory - ); 
return; 

} 

rdu->lmi_proto = LMI PROTOCOL; 
rdu->lmijxlu_type = "&DU_RELEASE REQ; 
rd u- > I mrcref_type = vp->vcte_creMype; 
rdu->lmrcref value = vp->vcte cref value; 

LMI_SET_EL^ENT(&rdu->lmi cause, LMI_RELEASE_CAUSE, cause); 
if (rtn = svc sdu(vp->vcte pctfTvp, rdu, slzeof(*rdu))) 
TR1 (TL1 , 'atm release: release failed %d\n", rtn); 

} 

/* 
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* atm_find_at() searches for an arptab entry given a mac address. 

* The 'best' entry upon which to send to the mac address is 

* returned. If the entry has no VC this routine attempts to setup 

* one, 

V 

u_char atmjnacbroad castaddr[6] = {Oxff, Oxff, Oxff, Oxff, Oxff, Oxff}; 

struct aate * 
atmjind_at(atp, dst) 

struct atmlf *atp; 

u char *dst; 
{ - 

struct vcte *vp = 0; 
struct aate *at; 

ASSERT(VAUD_ATP(atp)); 

at = atm_mac_to_aate(atp, dst); 
if flat) /* we~queue frames now.,. 1 1 
* !at->aate_vcte) */ 

at « atm mac to aate(atp t atm macbroadcastaddr); 
ff (fat) " 

return 0; 
"rf (!at->aate_vcte) 

atm_initiate_setup(atp t at); 
return at;. 



r 

* atmJnitiate_setupO initiates a vc setup between to the port 

* addresses using the specific interface. If there is already a vc 

* coming up between the two ports using that interface we do not 

* bother. This huarantees that we do not Initiate two VCs to the 

* same port address. When we get setup indications we must also 

* check for duplicates and decide which VC to keep. 

V 

atmjnitiate_setup(atp f at) 
struct atmif *atp; 
struct aate *at; 

{ 

Int rtn; 

struct pcif *pc = atp->ati pcrf; 
struct atrn_addr *from = &a7p->ati_port; 
struct vcte *vp; 

struct setup *pdu; /* setup pdu and sdu are the same */ 
struct lml_ulp *lu; 

if (pc->pc_sig->vcte state != VCS ACTIVE) 
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/* no signaling yet */ 
return 0; 

vp = svc__find vc(pc, from, &at->aate atmaddr, 

atm glo£>atrn uip, VCS NOT DEAD OR DYING); 
if(vp) " - - - ~ 

goto found_a_vc; 

pdu = (struct setup *) atm alloc msgO: 
If (Ipdu) 
return 0; 

pdu->lml_proto = LMI_PROTOCOL; 

pdu->lmi_ncaljs = 1; 

pdu->lmi_caller - *from; 

pdu->lmrcallee = at->aate_atmaddn 

pdu->lmi pdu type = SDU SETUP REQ; 

pdu->lmfcrertype - LMI ^REFTYPE SVC; 

pdu-> ImFcrervalue = 0;/* let svc module pick one */ 

lu = (struct IrriT ulp *) & pdu[1]; 

Iu->af type = CMl ULP; 

lu->afaal = PAYLOAD AAL 4; 

lu->af pid = LMI_MAC PID;~ 

lu->aCorg = LMI_MACTORG; 

If (rtn = svc_sdu(pc, 0, pdu, sizeof(*pdu) + sizeof(*lu))) 

TR1 (TL2 t "atmjnitiate setup: svc_sdu->%d\n', rtn); 
vp = svc_find_vc(pc t from, &at->aate_atmaddr, 

atm_glob->atm uip, VCS_NOT_DEAD OR DYING); 
found a vc: 
If (vp)l 
at->aate_vcte = vp; 
vp->vcte_atmif = atp; 
svcjnc(vp); 

TR1(TL1, "atm find_at: setup to %s fafled\n\ 
e160_ntoa(5at->aate atmaddr)); 
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/* atm.h 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

V 

#tfndef NIU ATM H 
#define NIU~ATM~H Included 

#lnclude - bytes.h" 
#include a unlpdu.h a 

r 

* atm mac service Interface (asl). This Is the same as an ethemet 

* header so that upper layers can simply assume ATM is an ethemet 

V 

struct atmmsl { 
u_char asl_dst{6]; 
u_char asrsrc[6]; 
u~short asl~type; 

}; " 

r 

* Structure of an ATM mac header for aal type 4, this is an 802.6 

* header. 

V 

struct atmjieader { 
struct atm_addr atm_dst; 
struct atm_addr atnTsrc; 
union { 
struct { 
ujnt mcb_pid:6; 
ujnt mcb~pad:2; 
ujnt mcb_delay:3; 
ujnt mcbJoss:1; 
ujnt mcb_crc:1; 
ujnt mcb_eien:3; 
u Int mcb_pad1:16; 
} mcbits; 
ujnt atnrwncbjong; 
} " un mcb; 

}; ~ 

#define atm_mcbits un_mcb^tm_mcbJong 

#define atrn_elen un mcb.mcbits.mcb elen 

#define atm_crc unjncb.mcbits.mcbjcrc 

#define atmjoss un~mcb.mcbits.mcbJoss 

#define atm_delay un jncb.mcbfts. mctTdeiay 

#define atm^pid un~mcb.mcbits.mcb_pid 
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#define ATM PID LLC 1 /* protocol ID for LLC */ 
#deflne ATM" MCfBITS NOCRC 0x04000000 /* protocol Id 1 */ 
#define ATMJHDR \JSA sizeof(struct atm header) 
#defme ATM~PADJSHIFT 24 

/* 

* The only header extension defined is a return port address. The 

* length must be set to ATME RPA SIZE. Pad exists to get the 64 bit 

* address 64 bit aligned relative to the atm header. 
V 

struct atm_header_ext { 
u_char atmejen; 
u~char atme_type; 

u_char atme~pad[2]; /* need not be zeros (nnbz) */ 
struct atm_addr atme rpa; /* return port address */ 



#define ATME_RPA_TYPE 112 /* out of SMDS range */ 
#define ATME_RPA BYTES sizeof(struct atmjieader_ext) 
#define ATME_RPAl/VORDS ((sizeof(struct atmjieader_ext) +3)/4) 

r 

* Callers to atrndata reqO must ensure atleast ATM_DATA_REQ_ROOM 

* bytes are available In front of the packet data. 
V 

#define ATM_DATA_REQ_ROOM (ATM_HDR_LEN + LLC_SNAP_LEN + ATME_RPA_BYTES) 
/* 

* multicast address structures are linked to atm_arptabs which are 

* marked ATF_MULTI. Such entries are not timed out, nor are they 

* freed when underiying VCs are released, atm delete lanO free's 

* the ATF_MULTI atm_arptab entries and atmaddjanfl & 

* atm_niu_to_niu() re-allocate them and re Initiate MC VCs for the 

* registered addresses. 
V 

struct mcaddr { 
u_char mc_enaddr[6]; /* multicast address */ 
u_short mc~count; /* reference count */ 
struct aate *mcTat; /* multicast VC */ 



#define MCADDRMAX 64 /* multicast addr table length */ 
#define MCCOUNTMAX (32*1024-1) /* multicast addr max 
* reference count */ 

/* 

* atmif, one per atm Ian, used by atm Ian layer 
V 

struct atmif { 
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struct niu_arpcom *atl_ac; /* contains arp and ffnet 

* structures */ 

struct atmlf *ati_next; /* linked off pctf structure */ 
u_short ati_state; /* basically do we know who 
~ * we are */ 

u_short ati_mid;/* mid used for multicast frames */ 
u_short atQncasts; /* max # multicasts circuits 

* configured */ 

struct atm_addr ati_port; 
struct atm_addr atl_mac; 
#define acjnac "ati_mac.aa_byte[2] 

struct pcif *atl_pcif; 

struct aate *ati_arptab; /* set at Initialization */ 

Int atl nunwncasts; 

struct mcaddr ~ ati_mcaddrs[MCADDRMAX] ; 

}; 

/* ati state * / 

#define ATSJNACT1VE 0 

#define ATS_ACTIVE 3 

r 

* global data structure for r/w variables and variables explicitly 

* initialized. 

V 

#indude TtaJf 

struct atm_globs { 

struct rf_tr_hdr *ltrb; 

struct atmif *atmif; 

int atmifn; 

int atmrf_used; 

struct llc^snap lie def; 

struct atm_addr aTm_broadcast; 

struct atm_addr atm null; 

struct ulptab *atm dp; 

int atm initialized; 

char static buf[32]; 

}; *" 

#ifndef RT68K 

extern struct atm_globs atm_globs; 

#define atm glob (&atm_g!obs) - 
#else 

#define atm_glob atm_get_glob() 
struct atm_gTobs *atnrTget giobO; 
#endif 
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#define LEN_FOR_MBUF_PTRS 0xf5560002 

#deflne HASH_MULTICAST_ADDRESS(x) ((x)&0xff) 

caddr_t atm alloc msgO. atm alloc_bytes0; 
#define NATMS "4 / r max # of ATM fans per physical 
* Interface */ 

#define e160_ntoa svc_e164_ntoa/* these are really E.164 addresses */ 
#endlf /* N1U_ATM_H */ 
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/* atm luit.c 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

* This file contains the ATM LAN configuration routines. They are 

* called by the ATM signaling module when signaling enters the 

* ACTIVE state and one or more ATM LANs have been provisioned 

* "added* by NM and they are called when signaling transitions to 

* the WGRC state to "deleted" the ATM LANs. 

* atm_attachjan() allocates atmif structures and Initializes them. 

* atm_add lanO actives an ATM LAN Initiates, atm delete lanQ 

* deactivates an ATM LAN. atm_niu_to_niu() activates an ATM LAN in 

* back to back configuration. atm_trace_bufO add a trace record to 

* the trace buffer. atm_trace_str() add a string to the trace 

* buffer. 

V 

static char sccsidQ = - %A%"; 

#include "debug.h" 
#include "niu.hr 

#:nclude "atm.h" 
#include "atmarp.h" 
#include "svc.h" 
#indude "debug.h" 
#include "trace-h" 
#indude "if_atm.h" 

#define TL1 1 

#define TL2 atm_trace > 1 

#d efine TL3 atm_trace > 2 

#define TL4 atm_trace>3 

#defineTL5 atm_trace>4 

extern int atm_trace; 
/* 

* atm_attachjan() is called when the maximum number of ATM LANs for 

* a particular plysical interface is known. The appropriate number 

* of atm Ian interface structures are allocated and linked Into the 

* physical interface structure. 

V 

atm_attachjan(atp, pc) 
struct atmif *atp; 
struct pcif *pc- 

{ 

struct atmif *an; 
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ff (an = pc->pc atmff) { 
while (an->atrnext) 
an = an->ati_next 
an->ati next * alp; 
atp->atT next = 0; 
} else { 
atp->ati_next = 0; 
pc->pcjatmff - atp; 

atp->atij>cff = pc; 

ASSERT(atp->ati_state " ATS INACTIVE); 

if_set_mac(atp); 

atm_arptab aJloc(atp); 

atm~bzero(Itp-> atljncaddrs. sizeof (atp->atl_mcaddrs)); 
atp->atl_num mcasts = 1; 
atp->atrmcaddrs[0].mc_count * 1; 

atm_bcopy(&atm_g!ob- > atm_broadcastaa bytefATM FIRST MAC], 

atp->ati mcaddrs[0].mc enaddr, 6); " 
If (pope flags & PCIF NIlF TO NIU) 
atm_niu_to_niu(atp); "~ 



r 

* This is called when a real switch tells use some real port 

* addresses. The mte's were freed when the previous Ian was 

* deleted. If the mtu is zero this is a null LAN. It should not be 

* made active. This allows users to configure interfaces starting 

* at aa2, aa3, etc. 
V 

atm_addjan(atp, port, mid, mcasts, mtu) 
struct atmlf *atp; 
struct atm_addr *port; 

TR1(TU, 'atm add lan: port = %s", 

el 60_ntoa(5atp-"> ati port)); 
if (mtu == 0) 
return; 

atp->ati_state = ATS ACTIVE; 
atj>>ati_mid = mid; " 
atp->atrmcasts = mcasts; 
atp->ati_port = *port; 
if_add_lan(atp t mtu); 
atm setup_mcasts(atp); 
TRlfTL2, "atm add lan: port = ^s", 

6160 ntoa(5atph>ati_port)); 
TR1CTL2T " mac = %s\n\ e160 ntoa(&atp->ati_mac)); 
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atm_setup_mcasts(atp) 
struct atmif *atp; 

{ 

int i; 
struct mcaddr *mc; 

for (i = 0; I < atp->atl_num mcasts; I++) { 
mc = &atp- > ati_mcaddrsp] ; 
ASSERT(mc->mc_at == 0); 
mc->mc at = atm_find at(atp ( mc->mc enaddr); 
ASSERT(mc->mc_at); 
mc- > mc_at- > aate_fiags | = ATF_MULTi; 
TRl(TL3r"atrn setup_mcast: porf= %s\n", 
e 1 60_ntoa(£mc- > mc_at- > aate_atmaddr)) ; 

} } 
/* 

* Called to free up any resources tied up by the ATM LAN, atp. The 

* arptab has been cleared by release indications except for 

* ATF_MULTI entries. Here we go through list of registered 

* multicast addresses free those arptab entries refernced. 
V 

atm_deietejan(atp) 
struct atmif *atp; 

struct mcaddr *mc; 

atp->atl_state = ATSJNACTIVE; 
TR1(TL1, 'atm deietejan: port = %s\ 

e160_ntoa(Satp->ati port)); 
TR1(TL1, " mac « %s\rf t e160 ntoa(&atp->ati mac)); 
atp- > ati_portaa_ty pe = AAT_NULL; 
for (mc = atp- > ati_mcaddrs; 

mc < &atp->ati_mcaddrs[atp->ati_num_mcasts]; mc++) { 
ASSERT(mc-> mc_count); 
If (mc->mc at) { 
ASSERT(mc-> mc_at-> aatejlags & ATF_MULTI); 
mc- > mc_at- > aatejlags = 0; 
at m_aat e_f ree (mc-> mc_at); 
mc->mc at = 0; 

} 

} 

ff_de!etejan(atp); 



r 

* set a local port address and mac address based upon mac address in 

* niu_arpcom referenced by atp. This is used when changing atm lan 

* configuration to a niu-to-niu configuration. Also set to 
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* broadcast mte entry and if signaling not debugged Install a nailed 

* up broadcast vc. 

V 

atm_nlu_to niu(atp) 
struct atmif *atp; 

{ 

extern Int gosig, niumtu; 

atm_bzero(&atp->ati port, steeof(atp->atl iport)); 

atp- > ati_port aa_type = AAT PORT; 

atm bcopy(&atp-> ati_maaaa bytefATM FIRST MAC], 

&atp->atl_portaa_byte[ATM N2N MAC], 6)T 
atp->ati_portaa iannum = if get lan(atp); 
atp->ati_state =~ATS_ACTiVE; ~ 
atp->atTmcasts = 32; /* its arbitrary */ 
atp->atijnid = 0; /* must be zero till ALAN aaJ driver 

* gets fixed */ 
rf_add_ian(atp, 0); /* do not change mtu */ 
atm setup_mcasts(atp); 
TR1(TL2, "atm niu_to_niu: port =* %s", 

e1 60_ntoa(5atp- > ati_port)) ; 
TRl(TL2 f " mac - %s\n\ e160 ntoa(&atp->ati mac)); 



svc_trace_pdu(p, len. in. vcQ 
char *p; 

{ 

atm_tracej>uf(p, atm_bcopy, SVC_PDU_TRACE, len, in, vcl); 



* atm_trace_buf 0 add a trace record to the trace buffer. 

V 

int atrntracejimit - 64; 

atmjrace_buf(p, copyproc, sub, tlen, in, vci) 
caddrj p; 
int (*copyproc) 0; 

struct if Jrjidr *rb; 
int s, len; 

if (tien > atm trace limit) 

len = atnrMrace limit; • 
else 
len ■ tlen; 

rb = (struct if _tr_hdr ■*) tr_get_entry(sizeof *rb + len); 
atm giob->ltrb = rb; 
if (!rb) 
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return; 

rb->thdr.subsystem = sub; 
rb->thdr.sss = In; 
rb->thdr.length = len; 
rb->tien - tien; 

atm_settlme(rb->thdr.tlme); 
rb->vcl = vcl: 

(*copyproc) (p, (char *) &rb[1], len); 



/* 

* atm trace strO add a string to the trace buffer. 

V " " 
atm_trace_str(str) 
char *stn 

{ 

struct trace_header *tn . 
int len; 

for (len = 0; strflen]; len+ + ); 
tr = (struct trace header *) tr get entry(sizeof *tr + 
If(ltr) ~ - - 

return; 

tr-> subsystem = ASCII LOG; 
tr->sss = 0; 
tr-> length = len; 
atm_settime(tr- > time) ; 

atm_bcopy((u_char *) str, (uchar *) & tr[1], len); 
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/* atmarp.c 
* 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 



* ATM address resolution protocol. This module contains the routines 

* which Implement atm arp. The two primary entry points are 

* atm_mac_to_aate<) and atm_arp JnputQ. 

* atm_mac to_aate() returns a pointer to and atm arp table entry. 

* atm_arpjhput() handles ail atm arp requests and replies. 
V 



static char sccsIdQ = '%A%'; 

#rfdef notdef 
#include •all.h" 
#fnclude "ip_errs.h" 
#include "unsp.h" 
#endif /* notdef */ 

#lnclude "atm.h - 
#include "svch" 
#include 'atmarp.h" 
#lnclude "debug.h" 
#Include "if_atm.h" 

#define TL1 1 
#defineTL2 arp trace >1 
#defineTL3 arp~trace>2 
#define TL4 arpjrace>3 
#define TL5 arp trace > 4 
Int arp_trace = 2; 

Int arp_debug = 2; 

char *atm mac sprintfO; 

#define N AATE S 64~ 

struct aate~ atm aate[N AATE S * ATM ARP TABLES]; 
Jnt atm_aate_size~= N_AATE S * ATM"ARP TABLES; 

Int atm_arptabs = 0;/* number of tables allocated (1 per 

* atm Ian) •/ 

struct aate ■ * 

atm arptab look(atp, addr) 

struct atmlf *atp; 

u_char *addn 

{ 

struct aate *ate = atp->ati_arptab, *end; 
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end = &ate [M AATE_S]; 
whlfe (ate < end) { 
If (atm_bcmp(ate- > aate_macaddr, addr, 
slzeof (ate- > aat e_macadd r) ) = = 0) 
return ate; 
else 
ate+ + ; 

} 

return 0; 



r 

* Broadcast an ATM ARP packet, asking who has addr on atm Ian ac. 
V 

atm arprequest(atp, addr) 
struct atmff *atp; 
u char *addn 



{ 



} 



struct atm_arp *aa; 

TR2(TL3, "atm^arprequestC&x. %s)\n", atp, 

atm_mac_sprintf(addr, 6)); 
aa = (struct atm_arp *) atm_alloc_msgO; 
tf (!aa) 

return; 

aa->aajip = htons(ARPHRD_ATM); 

aa->aa_ulp = htons(ETHERTY r PE_ATMMAC); 

aa->aajlpjen = sl29of (aa- > aa_sender_port) ; 

aa->aa_ulpjen = sizeof(aa->aa_senderjnac); 

aa->aa_msg_type = htons(ATM_ARP REQUEST); 

atm bcopy((caddr_t) & atp->ati_portr(caddrj) aa->aa_sender port, 

(ujnt) sizeof(aa->aa_sender_port)); "~ ~ ~ 

atm bcopy((caddr_t) & atp->ac_mac, (caddr_t) aa->aa_sender mac, 

^ujnt) sizeof(aa->aa_sender_mac)); 
atm bcopy((caddr_t) addr, (caddrjt) aa->aa_target_mac, 

ftjjnt) steeof(aa->aa_target_mac)); 
atm_bzero((caddr_t) aa->aa target port, sizeof(aa->aa target port)); 
atnTsend_arp(atp, addr, aa,"sizeof(*aa)); 



* atm_macjo_aateO returns a pointer to and atm arp table entry. 

* desten is filled in. If there Is no entry in arptab, set one up and 

* broadcast a request for the MAC address. An arptab point is 

* returned if an existing arptab entry was found, for the mac 

* address Is found (or computed). 
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struct aate * 

atm_mac to aate(ac, destmac) 
struct atmff *ac; 
u_char *destmac; 

struct aate *at; 



TR2(TL4, "atm_mac to_aate(%x, %s)\n", ac, 

atm_mac sprintffaestmac, 6)); 
at = aim arptab look(ac, destmac); 
if (at ==T)) { 7* not found */ 

at = atm aate ailoc(ac->ati arptab, destmac); 

if (at = «="&) " 

panicfatm_nrac_to_aate: no free entry"); 
if (!atm_bcmp(destmac, &ac->ac mac. 6)) { 
atm bcopy((caddr_t) & ac->atfport, 

Tcaddrj) & at- > aate atmaddr, 

(ujrit) sizeof(ac->atTport)); 
atm bcopy((caddrj) & ac->ac_mac, 

fcaddr t) at->aate macaddr, 

(u Jnt) "sizeof (at- > aate_macaddr)) ; 
at->aate_timer = 0; 
at->aate_flags = AATF_COMPLETE; 
at->aate_vcte = 0; 
TR2(TL4, " -> %x %s\n", at, 

svc_e 1 64_ntoa (&at- > aat e_atmadd r) ) ; 
return at; 
} else If (destmac[0] & 0x1 ) { 

* Calulate a suitable atm address to make a 

* connection with for this multicast 

* address. 
V 

atmarpmhash(ac, destmac, 

(caddr t) & at->aate_atmaddr); 
atm bcopy(destmac, (caddr_t) at- > aate macaddr, 

(ujnt) sizeof(at->aate macaddr)); " 
at->aate_timer = 0; ~ 
at- > aate flags = AATFCOMPLETE; 
„ at->aate~vcte = 0; /* no vote get */ 
TR2(TL4, \-> %x %s\n", at, 

svc_el64 ntoa(&at->aate atmaddr)); 
return at; 

} 

/* 

* Generate an ARP request, AATF RESOLVING avoids 

* recursion. 

V 

at->aate_flags | = AATF_RESOLVlNG; 
atm_arprequest(ac, destmac); 
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at->aate flags &= -AATF RESOLVING; 
TROOTjO -> 0\n"); 
return 0; 

} 

at->aate timer = 0; /* restart the timer */ 

If (at- > aate flags & AATF COMPLETE) { /* entry IS complete */ 

TR2(TLO-> %x%s\n*7at. 

svc_e1 64_ntoa (&at- > aate_atmaddr)) ; 

return at; 

} 

r 

* There is an aate entry, but no e164 address response yet 

* Avoid Infinite recursion by using the AATF_RESOLVING flag. 

* This is temporary. The port to rt68k will necessitate 

* restructuring which, hopefully. wBI remove the need for 

* this flag. 

*/ 

if (! (at- > aate Jags & AATFRESOLVING)) { 
at-> aate _flags | - AATF_RESOLVING; 
atm arprequest(ac t destmac); 
at->aatej!ags &= ~AATF_RESOLVING; 

TR0(TL4, • -> 0\n"); 
return 0; 

} 

* atm arp InputQ handles all atm arp requests and replies. 
V ~ " 

atm_arpjnput(atp, aa, src) 
struct "atmif *atp; 
struct atm_arp *aa; 
u char *src; 

{ " 
struct aate *at; 

u_char target_mac[6]; /* copy of target protocol 

* address */ 
struct atm_addr *sport; 

TR2(TL2, "atm_arpJnput(from %s / %s)\n" f 

atm_mac_spiinff(aa-> aa_sender_mac, 6), svc_e1 64_ntoa(aa- > aa_sender_port)); 

If (aa->aa_dp 1= ETHERTYPE_ATMMAC) 
goto drop; 

/* make a copy of target mac for use later */ 
atm bcopy((caddr_t) aa->aa targetjnac, (caddr_t) targetjnac, 
fujnt) si2eof(target_mac)7; 

If (!atm_bcmp((caddr_t) aa->aa_sender_mac, (caddr t) & atp->ac_mac, 
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sizeof(aa->aa sender mac))) 
/* its from me so just drop It */ 
goto drop; 

/* 

* Search the local database for senders mac address. Update 

* the database with new Information (first deleting old 

* Infomatlon). 

7 

at = atm_arptabJook(atp, aa->aa_sender mac); 
If (at) { /* if at is complete and" address Is 
* different then free entry */ 
If (at->aate_flags & AATF_COMPLETE) { 
If (atm bcmp (aa- > aa_sender_port, (caddr t) & at->aate atmaddr, 
(u_intj~sizeof(aa->aa sender port)) 1= OR /* If different */ 
atm aatejree(at); " 
at ="0; 

} 

} else { /* if at is Incomplete update It */ 
atm_bcopy((caddr_t) aa->aa_sender port, (caddr t) & at->aate atmaddr, 

sizeof(aa->aa_lender port)); 
at->aate flags | = AATF COMPLETE; 

} 

} 

/* 

* If we did'nt find his mac address and he IS looking for 

* us. Then learn his as well 
V 

if (at = = o && !atm_bcmp(target mac, &atp->ac mac, sizeof(target mac))) { 
/* ensure we have a table entry */ ~ " 

If (at = atm_aate_alloc(atp- > ati arptab, aa->aa sender mac)) { 
atm_bcopy((caddr t) aa->aajsender port, (caddr t) & at->aate atmaddr, 

(ujnt) steeof(aa->aa_sender_port)J; 
at->aate_fiags | = AATF_COMPLETE; 

} 

/* 

* If we found his mac address and his mac address is NOT the 

* same as the guy we got this frame from, then set 

* AATF PROXY. 

V " 

If (at && atm_bcmp((caddr t) src, (caddr t) aa->aa sender mac. 
(ujnt) sizeofaa->aa sender mac]) 
at->aate flags | = AATF pROXYf 
reply: 

/* v, • 

* Make sure that you are trying to resolve a MAC address vs " 

* some other type of address. 
V 

if (aa->aa_msg_type != ATM_ARP REQUEST) 
goto drop; 



WO 94/07316 




atmarp.c 

-23- 

if (latm_bcmp(target mac, &atp->ac_mac, (ujnt) slzeof(target_mac)) 1 1 
atm~mac learned" on non atm Interface (target mac)) 

r ~ ~ 

* Either we are the target of the arp request or we 

* found the target mac address is in our forwarding 

* database and It was learned on a non-ATM Interface 

* so we send a proxy atm arp response because the 

* atm arp request can not be forwarded onto that 

* link. 
V 

sport = &atp->ati port; 
else 
goto drop; 

/V 

* We have decided to respond. Turn the request into a 

* response by copying the sender's port address into the 

* target port adr. Copy the senders protocol (MAC) address 

* Into the target address. Copy the target protocol address 

* (target_mac) into the senders protocol address and copy 

* the port selected above into the senders port address. 

V 

atm bcopy((caddr_t) aa->aa_sender port, (caddr_t) aa->aa_target_port, 

Tujnt) sizeof(aa->aa_sender_port)); 
atm bcopy((caddr_t) aa->aa_sender mac, (caddr_t) aa- > aa_target_mac. 

Tujnt) sizeof(aa->aa_sender_mac)); 
atm bcopy((caddr_t) target_mac, (caddrj) aa->aa_sender_mac, 

Tujnt) si2eof(aa->aa_sender mac)); 
atm bcopy((caddr_t) sport, (cad3r_t) aa->aa_sender_port, 

fujnt) sizeof(aa->aa_sender_port)); 
aa->aa_msg_type = htons(ATM_ARP_REPLY); 

/* go ahead and send It */ 

atm_send_arp(atp, (caddr t) aa->aa_target mac, aa, sizeof(*aa)); 
return; 
drop: 

atm_free_msg((char *) aa); 
return; 

} 

r 

* atm_arptab_ailocO allocates an atm arp table for the atmif 

* structure atp and schedules the first first timeout for that atm 

* arp table. Each atm arp table has uts timeouts scheduled 

* separately. This Is an attempt to spread signaling traffic out 

* when there are multiple LANs. Zero Is returned if no table could 

* be allocated. 

V 
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struct aate * 
atm_arptab alloc(atp) 
struct atmlf *atp; 



struct aate *at; 

at = &atm - aate[N - AATE_S * atm arptabs]; 
If (atm_arptabs * - ATM ARP TABLES) 

return 0; " 
atp->ati_arptab = at; 

atm_sched_timeout(atp) ; 
atm_arptabs+ + ; 
return at; 

> 

c 

* a tmaata JreeQ is called when an atm arp table entiy Is no longer 

* f n *K Se Jt a V ? is reference d Its reference count Is decremented 

* retease theVC 9000 9 ° 9S t0 ZBT ° atm - re,ease 0 to called to 
^ ease 

atm_aate_free(at) 
struct aate *at; 

TR tKi«i m ^V free(%s 1 %s )\ n "- a *m_mac sprintf(at->aate macaddr, 6) 
AO fvc e164^ntoa(«at->aate_atmaddr)); - H * - ar ' 0)t 

ASSERT((at- > aate Jags & AATF MULTICAST) ==0)* 
at->aate_timer = at->aate_flags~= 0- 
if (at->aate_vcte && (svc_dec(at->aate vcte) 0)) 
atm_release(at->aate vcte, VC IDLEF 
^ at->aate__vcte = O; ~ 

r 

* hSLfiTSr ad . dreSS ln aat !: pushln 9 out the oldest entr Y from the 
^ bucket if there is no room. This always succeeds since no bucket 

can be completely filled with permanent entries (except from 

* fit)™- When teStin ° whether mother permanent entry will 
V 

struct aate * 
atm_aate_alloc(at. addr) 

struct aate *at; /* base of aate table for this Ian */ 

u_char *addr; 1 

int hiwater « 0; 

struct aate *victum = o. *end = &at[N AATE SJ; 



Sf-.-; 
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TR1 (TL3, *atm_aate aIloc(%s)\n y . atnwnac sprlntf(addr, 6)); 
while (at < end) { ~ 
If (at->aate_flags == o) 
goto found; 

if ((at->aate flags & AATF MULTICAST) == 0 
&& (at->Iate timer > =~hlwater)) { 
hiwater = at->aate_tlmer; 
victum = at; 

} 

at++; 

} 

ff (!victum) 
return 0; 
at = victum; 
atm_aate free(at); 
found: 

atm bcopy((caddr t) addr, (caddr t) at->aate macaddr, 

Tu int) sizeof (aF- > aate_macaddr)) ; 
at->aate_flags = AATFJNUSE; 
at->aate vote = 0; 
return (at); 



/* 

* atmarphashO - algortthmlcly generates an ATM multicast address 

* from a 48 bit address. If the number of multicast circuits 

* supported on this LAN (ati_mcasts) Is 0 then use all 48 bits of 

* the MAC multicast address. The asumption being the network Is 

* providing multicast service via a server with no limit to number 

* of multicast connections available to each station. If ati_mcasts 

* is greater than zero then the 48 bit address is folded Into a 

* unsigned 32 bit integer by exclusive or*ing the first 2 bytes into 

* the last two bytes. The resulting integer is divided by ati_mcasts 

* and the resulting number is used as the ATM multicast address. 
V 

atmarpmhash(atp, mac, port) 
struct atmff *atp; 
u_char *mac; 
struct atm_addr *port; 

port->aajong[0] « 0; /* clear first word of address */ 
if (atp->ati_mcasts = = 0) { 
atm_bcopy(mac, &port->aa_byte[ATM FIRST MAC], 6); 

} else { 

port->aa long[1] = ((mac[2J << 24) | 

((mac[3] ~mac[l]) << 16) | 

((mac[0] ~ mac[4]) < < 8) | 

(mac[5])); 
port->aajong[i] %= atp->atl_mcasts; 
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/* 

* This must be flipped In order to get It Into 

* network byte order 
V 

htonl(port->aa long[1]); 
^ port- > aa_byte[ATM_RRST_MAC] = 1; /* set multicast bit */ 

TR1(TL4. •computed mcast of %x\n* ( port->aa long[1]); 
port->aa_type - AAT_MAC;/* set the type ffelcT */ 

/* 

* arp_setupO Is called when a new VC Is setup. The arptable Is 

* searched for entries needing a VC to the peer port Those entries 
*^are updated to reference the new VC. 

arp_setup(at, vp) 
struct aate *at; 
struct vcte *vp; 



{ 



} 



int |; 

TR1(TL2, 'atm_setup(%s)\n'. svc_e164_ntoa(&vp->vcte_peer)); 

for (i = 0; i < N AATE S; I++, at++) { 
if (i(at->aatejfags &~AATF_COMPLETE)) 
continue; 

if (!atm_bcmp(&at->aate_atmaddr t &vp->vcte peer, 
sizeof(vp-> vcte peer)) && " 
at->aate_vcte != vp) { 
at- > aate vcte = vp; 
svcjnc(vp); 

} } 



r 

* arpj-eleaseQ is called when a VC is about to be released. The 
arptable is searched for references to the VC. Any entries found 

* are freed. 

V 

arp_reiease(at, vp) 
struct aate *at; 
struct vcte *vp- 

{ 

Int |; 

TR1 (TL2, "arp_release(%s)\n" > svc el64 ntoa(&vp->vcte peer))- 
for (I = 0; I < N_AATE_S; l+ +, at+ +) f Lf*™». 
If (!(at->aate_flags & AATF_COMPLETE)) { 
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ASSERT(at- > aate_vcte = = t)); 
continue; " 

} 

If (at->aate_vcte 1 = vp) 

contlnuer 
at- > aate vcte «= 0; 
svc dec(vp); 

If ((at->aateflags & AATF_MULTICAST) mm 0) 
atm_aatelree(at); /* must clear aate vcte 
* "first V 

else 

TR1 (TL2, "arpj-elease: skipped AATF_MULTICAST at=%x\n' f at); 

} 

ASSERT(vp->vcte_refcnt == 0); 



Int atmarp_timeo1 = 24; /* idle timeout */ 

int atmarp_timeo2 = 3; /* incomplete timeout */ 

extern int hz; 

r 

* atm_arptimerO scans arp tables for active the ATM LAN atp. VCs ar 

* established fo registered multicast addresses if none exist Atm 

* arp enrties for none registered addresses are timed out. When the 

* last reference to a VC is freed that VC is released (atm_aate_free 

* does this). 

V 

atm_arptimer(atp) 
struct atmif *atp; 

struct aate *at = atp->ati_arptab, *end; 
int s; 

TR1(TL3, "atm_arptimer(%x)\n - , at); 

atm_sched_timeout(atp); 

if (atp- > ati_state « ATS INACTIVE) 

return; 
s = splimpO; 
end = &at[N_AATE_S] ; 
for (; at < end; at++) { 

/* set up multicast circuits which have been released */ 

if ((at->aate_flags & AATF MULTICAST) && 
(at->aateTvcte = = o J T 

((1 < < at->aate vcte->vcte_state) & VCS_DEAD_0RJDY1NG))) { 
atmjnitiate^setupfatp, at); 
continue; 

} 

if (at->aate_flags = = 0 1 1 

(at->aate_flags & AATF_MULTICAST)) 
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continue; 
at->aate tlmer+ + ; 

If (at->a5ejags & AATF COMPLETE) { 
If (at->aate_timer >= atmarpjlmeol) 
atm aate_free(at); 
} else If7at->aate timer >* atmarp tlmeo2) 
atm_aate_free(at); ~ 



} 

splx(s); 



} 
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/* atmarp.h 

* * COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

#rfndef RT68K 
#lnclude "sys/typesh' 
#else 

#lnclude <stdinth> 
#endif 

/* 

* ATM Address Resolution Protocol (or ATM ARP) Definitions. 



#define ETHERTYPE ATM MAC 0x0805 

#define ARPHRD ATM 16 

/* 

* ATM Address Resolution Protocol. 
V 

struct atm_arp { 
u_short~ aajlp; /* lower layer protocol */ 
u~short aa~ulp; /* upper layer protovd */ 
u_char aajlpjen; 
u_char aa_ulpjen; 
u~short aa_msg type; 
u~char aa_sender_port[8] ; 
u_char aa_sender~mac[6] ; 

u~char aa~target port[8]; 
u_char aa targei'macfe]; 

}: 

/* aa msg^type' s */ 
#define ATM_ARP REQUEST 1 
#define ATM ARP~REPLY 2 
/* ~ ~ 

* MAC to ATM address resolution table, atm arp table entry, aate. 
struct aate { 

struct atm_addr aate_atmaddn /* port address */ 
struct vcte *aate_vcte; /* vcte reference */ 
u_char aate_macaddr[6]; /* mac address */ 
u_char aate timer; /* ticks */ 
u char aate^flags; /* flags */ 

}: 

/* aatejflags field values */ 
#define AATFJNUSE 0x01 
#define AATF COMPLETE 0x02 
#define AATF MULTICAST 0x10 
#define ATF_faULTl AATF MULTICAST 
#define AATF PROXY 0x20 
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#define AATFJJESOLVING 0x40 

struct aate *atm aate allocQ. *atm arptab lookO, *atm arpresoJveO; 
staict aate *atm arptab allocO, *atm find ~at(); 
extern struct aate atm aatiQ; 
#define ATM ARP TABLES 16 
extern Int Itm_arptabs; 
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/* btts.c 



* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

V 



END 



#ifndef UNIX 

#define ERRLOG prlntdbg 

#deflne prlntf prlntdbg 

#end» /* tfndef UNIX */ 

#lnclude <stdint.h> 
#lndude 'bits.h" 

bits_get_bft(brts, size) 
bits t *bits; 



{ 



int size; 

int max_bit; 

int ret; ~ 

int i; 

bits_t mask; 

max brt = size * 8 * SIZEBITS; 
for (ret = 0; ret < max bit; ret++) { 
BITSJ3ET I MASK(ret, i, mask); 
if ((bitsfi] S mask) == 0) { 
bits[i] | = mask; 
return (ret); 

} 

} 

return (-1); 



bltsjst_bit(brt, bits, size) 

int bit; 

bitsj *bfts; 

int size; 

{ 

Int ret; 

Int I; 

bits_t mask; 

BlTS_GFM_MASK(brt, i, mask); 

ret « i < size && (bits[Q & mask) != 0; 

return (ret); 
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bits alioc_bit(bit, bits, size) 
int bit; 
bitsj *blts; 
int size; 

{ 

Int ret; 
Int I; 
bits_t mask; 

if (Ibits tst brtfbit, bits, size)) { 
BITS" GET I MASK(bit, I, mask); 
if(l<slzeJT 

blts[i] | = mask; 

return (-1); 
} else { 

return (0); 

} 

} 

return (0); 



bits_free_bit(bit, bits, size) 

Int bit; 

bitsj *bits; 

int size; 

{ 

Int i; 

bitsj mask; 

BITS GET l_MASK(bit I, mask); 
If (i < sizef 

bits [I] &= -mask; 

} 

print J>its(bits. size) 
bits J *bits; 
Int size; 

int i; 

for (i = 0; i < size; i++) { 
if (bits[i] = = 0) { 

printffOxO '); 
} else { 

printf( u 0x%08x bitsfl]); 

} 

} 
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/» blts.h 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

V 

#IfndefBITS H 
#define BITgjH 

typed ef tUINT32 bits J; 

#define SIZE_BITS (sizeof(bJtsJ)) 

#define BITS GET I MASK(bit, i, mask) \ 
((0 = (bit)"/ (8 * SlZE_BITS).\ 

(mask) = (brtsj)0x80000000 > > ((bit) % (8 * SIZE_BITS))) 
#endif /* ifdef BITS_H */ 
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if atm.c 



/* if_atm.c 



* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 



* This file contains the operating specific routine for the ATM LAN MAC 

* for UNIX- The routines defined here are: atm attachO Is called 

* once per phys l/f at Initialization. " 

* if.set^macO is called get a MAC address from the OS. 

* if^add JanO is notify the OS an ATM LAN Is ACTIVE. 

* ITdeleteJanO is notify the OS an ATM LAN is INACTIVE. 

* atm_free_packetsO is called to free packets queued on a VC. 

* atm_append_packetQ appends a packet on VC til it comes up. 

* atm_send_packets() is called when a VC becomes established. 

* atm_settimeO Copy OS notion of time Into long array of 2. 

* atm_sched_timeout() schedule the OS to call atm_arptimer(). 

* svc_schedjimeoutO schedule the OS to call svcJimeoutO. 

* svcJnitO allocates global memory area for ATM signaling. 

* svc_reportj/ersion conflictO report signaling version conflicts to 

* OS. 

«• 

* atm_ailoc_msg0 allocates a msg buffer large enough for signal PDUs. 

* atm_free_msgO frees message memory pointed to by cp. 

* atm_ailocj3ytes0 is used to allocate memory for data structures 

* aal_send_msg0 sends the pseclfied aal payload on a VC. 

* atm_send_arpO send a frame encapsulating in 80&6/LLC/SNAP type=ARP. 

* atm_macjnput0 handles aal payloads with 802.6 PDUs (ATM LAN). 

* svc_macjnput() handles aal payloads with SVC PDUs. 
V 
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if atm.c 
^35. 

static char sccsidQ = •%A%"; 
#lfndef INET 

#define INET /* only support Internet addressing */ 
#endif 

#include "../sys/paranrth" 
^include "../sys/systrrth' 
#lndude •../sys/mbuf.h" 
#include "../sys/socketh" 
#include "../sys/ermo.h - 
#lnclude "../sys/loctLh" 

#include "../net/if.h" 
#include "../net/netisr.h - 
#indude "../net/route.h" 
#include \./ne\/V_arp.h m 

#include ■../sun/bpenprom.h" 
#inciude "../sun4c/mmu.h' 

#ifdef INET 

#includs - ../netinet/In.h" 

#include \./netinet/in_systm.h" 

#include '../netinet/in var.h" 

#include '../netinet/lpTh" 

#endif 

#include "debug.h" 
#include 'nlu.h' 
#include "unipdu.h" 
#Include "atm.h ,, 
#include Tlch" 
#include "svc.h" 
#inc!ude "svc_utl.h" 
#include "if^niuarp.h" 
#include "atmarp.h" 
#include "if_nluh" 
#indude Tfjilulo.h - 
#indude "if atruh" 
#indude "sys/tlme.h' . 

Int atm_watchO: 
Int svc_pcm = 1; 

extern Int atm trace; 
#defineTL1 1 " 
#define TL2 atm_trace>1 . . 
#define TL3 atm_trace>2 
#define TL4 atm trace > 3 
#define TL5 atm~trace>4 
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if atm.c 



struct niu_arpcom niu_arpcoms(NNIU * NATMS]; 
/* 

* atm__attachQ is called when the maximum number of allowed ATM LANs 

* for a specific Interface have been determined, atm nnius must be 

* patched with the number of ATM LANs per physicaflnteflace before 

* booting. Only that number of ATM LANs wOl be configured 

* regardless of ATM LAN configuration Information providled by the 

* LMI configuration protocol, (We could dynamically attach and 

* dettach Ifnet structures BUT the there Is a significant 

* probability other code In the system assumes Ifnets are are static 
Rafter boot So ifnets are statically linked once at boot) 

atm_attach(pc) 
struct pcif *pc; 



{ 



} 



struct ffnet *ifp; 
struct atmif *atp; 
int Ian, ifunit; 

int niuoutputO, niusoioctlQ. mac[2j; 

atm inftQ; 

for (Tan - 0; Ian < pc->pc numjans; lan++) { 
ifunit = atm glob->atmif used++; 
atp = &atm_glob-> atmif [ifunit]; 
atp->ati_ac = &niu_arpcoms[ifunft]; 
niu_arpcoms[ifunit].ac_atmif = atp; 
ifp = &atp->ati_ac->ac If; 
ffp->if_unlt = ifunit; 

if (niujnfo[pc->pc num].macaddr[0] 1 1 
niuJnfo[pc->pc"numl.macaddr[1J) { 
mac[0] = niuJnfo[pc->pc_num].macaddr{0]; 
mac[l] = niuJnfo[pc->pc numj.macaddrft] + Ian: 
bcopy(((char *) mac) + 2,~ 

((struct niu_arpcom *) ffp)->ac enaddr, 6)* 
} else " 

niu _get_enaddr(ifp-> ffunlt, 

((struct niu arpcom *) ifp)->ac enaddr); 
ffp->if_name = "aa"; " 
rfp->lf_mtu = pc- > pc_hw_max_mtu; 
ifp->if_flags « IFF BROADCAST | IFF NOTRAILERS; 
ffp->fMoctJ = niusolocti; 
ifp->ff_output = niuoutput; 
ifp->if_promisc = 1; 
lfp->lTtimer *1; 

rfp->if_snd.ifq maxien = IFQ MAXLEN; 
rfp->if_watchdbg = atm watch; 
if_attach(ifp); 

atm_attachjan(atp, pc); 
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""-37- 

} 

Int awi = 0; /* atm watch Interval, for those who 

* can not type */ 
Int awfttg[NNIU]; /* atrn watch Interval ticks to go */ 

atm watch(lfunlt) 
in7 think; 

{ 

struct If net *ifp = (struct tfnet *) & niu arpcomsfffunit]; 
int lounlt » NIU IFUNIT TO l<3UNIT{ifunlt); 

int s; 

tfp->ff_timer = 1; 
if (ifunlt I = 0) 

return 0; 
If (awi == 0) 

return 0; 
if (awfttgfiounit] < = 0) { 

prlntfCreseting unit %d from watchdog\n\ lounlt); 

s = splimpO: 

(*niujnfo[iounit].reset) (iounft, 1); 
if (niu Jnfofiounit] .type == NIU TYPE HW) { 
setup_rxbuf(&niuJnfo[iounft]J; 

splx(s); 

awittgfiounit] = awi; 
} else 

awittg[iounit]-; 
return 0; 



r 

* set ati_mac from value provided by os 
*/ 

if_set_mac(atp) 
struct atm'rf *atp; 

{ 

bzero(&atp->ati mac, sizeof (struct atm addr)); 
atp- > ati^mac.aa^type = AAT_MAC; 
bcopy(a7p->ati ac->ac enaddlr, 

&atp- > atiJmac.aaJbyte[ATM_FIRST_MACJ, 6); 



r 

* If addJanO is notify the OS an ATM LAN Is ACTIVE, (and 

* conditionally set mtu size) 
*/ 

ff_addjan(atp, mtu) 
struct atmif *atp; 
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Int mtu; 

{ 

If (mtu && mtu <= atp->ati pcif->pc hw max mtu) 

((struct ifnet *) atp->ati_ac)->if mtu = mtu; " 
((struct Ifnet *) atp->atijjc)->lfjlgs |= IFF_RUNNING; 

r 

* lf_deletejan() Is notify the OS an ATM LAN Is INACTIVE 

/ 

rfjdelete lan(atp, mtu) 
struct atmif *atp; 

((struct ifnet *) atp->ati_ac}->ifjiags &» -IFF_RUNNING; 

/* 

^ convert os ffunlt to atmif index, this Is not called very often. 

HL9 e Uan(atp) 
struct atmif *atp; 

int |; 

struct atmif *atp0; 

for (i = o, atpO = atp->ati pcif->pc atmif: 
atpO ! = atp; 

atpO = atp0->ati next, i++); 
return I; 

} 

/; 

*^arm_freejpacketsO is called to free packets queued on a VC. 
#ifndef KERNEL 

#define mjreem(m) atm free msg(m) 
#endif 

atm_free_packets(vp) 
struct vcte *vb: 

{ 

struct mbuf *m = (struct mbuf *) vp->vcte packet- 
struct mbuf *m0; ' 

while (m) { 

mo = m->m_act; 

m_freem(m); 
^ m = m0; 

vp->vcte_packet = 0; 
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/* 

* atm_append_packet() appends a packet on VC til It comes up. (we 

* only queue two packets) 
V 

atm_append_packet(vp, m) 
struct vote *vp; 
struct mbuf *m; 

{ 

m->m act = 0; 
If (vp->vcte_packet) { 
If (((struct mbuf *) vp- > vcte_packet)- > m act 1= 0) { 
m_freem(m); ~ 
return; 
} else 

((struct mbuf *) vp->vcte packet)->m act = m; 
} else 

vp->vcte_packet = (caddr t) m; 
svc_g!ob->svcstat queued frimes+ + ; • 
return; " 

} 

/* 

* atm_send_packetsO Is called when a VC becomes established. Any 

* queued packets are sent. 

V 

atm_send_packets(vp) 
struct vcte *vp; 

{ 

struct mbuf *m = (struct mbuf *) vp->vcte_packet; 
struct mbuf *m0; 

while (m) { 
mO = m->m_act; 

aal_send_msg(vp i vp->vcte atmif->ati mid, (caddr t) m, 

LEN_FOR MBUF PTRS); 
m = mO; 

} 

vp->vcte_packet = 0; 



/* 

* atm settimeO Copy OS notion of time Into long array of 2. 
V " 

atm_settime(t) 

struct timeval *t; ■ 

{ 

extern struct timeval time; 
int spl; 
spl = spl7Q; 
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*t = time; 
splx(spl); 



Int atm_arptlmer(); 

Int atm~arp_ms_per tick = 10000; /* once every 10 seconds */ 

/ 

* atm_sched_timeoutO schedule the OS to call atm arptlmerO. 
/ ~ 
atm_sched timeout(atp) 
roister struct atmlf *atp; 

#lfdef notdef 
/* I assumed tcp start timer0 takes seconds ?? */ 
tcp_startjimer(&{irtp->tmr entry), 

atm_arpjns_per tick J 10 ? ? ?, 

atm arptimer, (caddr t) atp); 

#eise 

timeout(atm_arptimer, (caddrj) atp, 
atm arp ms per tick * hz / 1000): 
#endif ~ " - ' 

> 

/; 

* returns true if we are forwarding frames out a specific non-ATM 

* Interface. Otherwise returns false. 
V 

atmmacjeamed on_non atm interface (mac) 
caddr t mac; 

{ 

return 0; 

} 

c 

* atm_send arp() send a frame encapsulating in 802.6/LLC/SNAP 

* type = ARP. ' ' 

V 

atm_send_arp(atp, mac, msg, len) 
struct atmif *atp; 
caddrj msg, mac; 

struct mbuf *m; 
struct sockaddr sa; 

m = dtom(msg); 
m->m Jen = len; 
ASSERTflen < = MLEN); 
sa.sajamily = AF UNSPEC; 
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•41. 

((struct ether header *) sa.sa data)-> ether type = 

ETHERTYPE_ARP; 
bcopy(mac, 

((struct ether_header *) sa.sa_data)-> ether dhost, 6); 
niuoutput(atp->ati ac, m, &sa); 



/* 

* aal_send_msgO sends the psecifted aal payload on a VC. Sends a 

* message7msg, of length, len, byte on VC vp using multiplex-Id, 

* mid. If len is UEN_FOR_MBUF_PTR then msg is a pointer to an mbuf 

* chain. Otherwise it is a pointer into an mbuf. There should 

* probably be separate routines for this... 
V 

aal_send_msg(vp, mid, msg, len) 
struct vcte *vp; 
int mid; 
caddr t msg; 
Int len; 

{ 

struct mbuf *m; 
struct ifnet *ifp; 
struct sockaddr aal sa; 



if (len == LEN_FOR MBUF PTRS) { 

m = (struct mbuf *) msg; - " 
} else { 

struct setup *pdu; 

pdu = (struct setup *) msg; 

TR1 (TL3, "aal_send: %s\n\ 

svc_pdu_type_str(pdu-> imi_pdu_type)) ; 

if (pdu->lmi_pdu_type < = LMI PD0_LAST) 
svc_giob- > svcstat pdus_sentlpdu- > Imi pdu_type] + + ; 

m = dtom(msg); 

m->m_len « len; 

if ((pdu->lmi cref type | pdu->lmi_cref_value) &&TL2) 
svc_tracejpdu(pdu, len, 0. vp->vcte_ovpcI); 

vcoutput(vp, m, mid); 



/* 

* atm_macjnputO handles aal payioads processing 602.6 & calling 

* LLC. Should be called at SPUMP. Called by dellverpacketQ. 

* atmjdataJndO is called to process the ATM MAC header and get a 

* pointer to the LLC header. Ilc_data indO is called to process 

* the lie frame. 
V 
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if atm.c 

""-42- 

atnrwnac input(vp, mo) 
struct rnbuf *mO; 
struct vcte *vp; 

struct ffnet *Jfp; 
struct atm header *ah; 
struct llc_shap *lp; 
u_char " *src; 
ujong *p; 
In? mac hdr len; 

•nt promise = 0; 

jfp = (struct ffnet *) ((struct atmff *) vp->vcte atmif)->ati ac; 
ifp->lfjpackets++; ' - ' 

DB1(DL4, "aa%d: atrnmacjnput\n", tfp->ffjjnit); 

ah = mtod(mO, struct atm header *): 
ASSERT((((uJong) ah) & 0x3) = = 0); 

K^Tr 16 " 1^ C - L£N + *™_HDRLEN + ah->atm elen * 4) { 
m fr£m(mO) atm - mac ^ ut short tame\n", Hp-> iTunit); 
reFurn ENOBUFS: 

} 

ff (ah->atm_dsLaa byte[2] & 0x01) { 

If (!niu_findmultiftp->vcte atmif, &ah->atm dst.aa bytef2D) i 
promise = 1: ~ - U,M 

} 

} JSm^^ vp.>vctejitmif->ati mac)) { 

} 1 

lp = (struct lie snap *) ((caddr t) ah + ah->atm eien * 4 + 

sizeof(*ah)); 
mac hdrjen = (caddr t) lp - (caddr t) ah; 
src = &ah- > atm sreaa byte J2J; 
If (rfp->if_promisc) /* assume nit interface Is active */ 

If S^nfec^ 8026 ^' ^ mac - hdr - len - P romis c); 

m__freem(mO); 
else { 

m adjfmO, mac_hdr_len); 

if (ah- > atm pid l= ATM PID LLC) 

mJreemfmO); ~ " 
else 

Ucdatajndfrfp, mO, sre, mac hdrjen, lp); 
return 0; 

r 
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if atm.c 

"-43- 



. svc mac input 0 handles aal ^yloads ^^J^^ 

* must fit in one mbuf. Hence A a JJf^^ofiS^ using 

* 4.2BSD UNIX implementations. This couia oe cnai y 

* ciusters for PDUs. 
*/ 

svc macjnput(vp, m) 
struct vcte *vp; 
struct mbuf *m; 

* Int len mjen(m); 

If (len > MLEN) { 
svc glob- > svcstaLpdu Joo_blg + + . 

m_freem(m); 

return 0; 

} . : ... 

m = mj3ullup(m, len); 

H( S vc%lo°^ 
return 0; 

ASSERT((mtod(m. Int) &3) == 0); 

if (m->m next) { 
m Jreem(m- > m_nexl) ; 
m->m_next = 0; 

Lc pdu<vp->vc*e_pcif, mtod(m. caddrj), len); 

> 

x/**/domain.dom next = domains, \ 
domains = &x/"/domain; \ 

} 

1 svc WO allocates global memory area for ATM signaling. 
*/ 

extern int tr _ bu, - sbB i„* rAB <?1ZEV 
struct vcte svc vctes(VCTAB_SlZEl, 

Int wc -^^ M T,fpgi. 
struct ulptab svc_ulptab[NULPbJ. 

stmct atm_globs atm_globs; 
struct tr_globs tr_globs: 
- struct svc globs svc_globs; 
char svc_8l64_str[32l; 

svc InttQ 



v. 
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struct vote *vp; 

,nt svcjnacJmlQ, svc_mac_lnputO; 

if (svc Init count) 
return; ~ 

!^-9|°b->vcte:base = 

svc_gob->ulptab = svc ulpfeb: 

svc giob->uIp Inuse - 0; 

for (vp = svc_vctes; vp < &svc vctesfVCTAB 

a-ss i r w% ,2EI: ^ +) 

svc gtob.>%'p1S-L nj;ut ' SVC - mac -'^ 0); 

;[ s-s^ss^svt ^ * nn,u >«- 

svc glob->svc Dcifa - a^J^' slzeof (stnJct pelf) » NNIU)- 
svcJ,ob->s^c:SrSs\ & s^^ 

sizeoffstruct atmi!) * NATMS* NNIU); 

?R^ tr -S ,ob ' * buf size)- 
ADDDOMAJN(pvc) * 

ADDOOMAJN(svc)- 

ADDDOMAfNfllc); ' 
pvcJnitO; 

#ffO 

atm_bzero(p, I) 
char * n . 

{ p ' 

bzeroftj, |) ; 

atm_bcopy(s. d, I) 
char »s, *d; . 

t ''"■'.* 

bcopy(s, d, I); 
atm_bcmp( Sf d, I) 
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char *s, *d; 

{ 

return bcmp(s, d, I); 

} 

#endif 
/* 

* svc_sched_tJmeoutO Is called to schedule svc_tlmeout() to be 

* called with the argument *pc" when the next signaling tick tack's. 

* On UNIX this is mapped onto timeoutO converting svc_ms_perjlck 

* to Hertz. Presumably MS-DOS uses Avis based timeouts. " 

V 

svc_sched_timeout(pc) 
struct pcif *pc; 

{ 

int svc_timeout{); 

timeout(svc_tlmeout, (caddr_t) pc, 
(svc_ms_per_tick * h2) / 1000); 



/* 

* svc_report_version_confHct() is called everytime a signaling PDU 

* with an unsupported version is received. It should report this 

* using the appropriate OS routines. For UNIX we printf to the 

* console no more than once every 15 seconds. 
V 

struct timevai svcJast_conflict; 

svc report version conflict^ 
{ " 

extern struct timevai time; 

if ((svc_last_conflict.tv_sec + 15) < time.tv_sec) { 

printf ("niuO: signaling protocol version conflict\n'); 

svc last conflicttv sec = time.tv sec; 
} " " 



r 

* atm alloc msgO allocates a msg buffer large enough for signal 
*PD0s. " 

V 

caddr_t 

atm alloc msgO 

{ ~ " . 
struct mbuf *m; 

m = m_get(M_DONTWAIT, MT_DATA); 
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if (!m) 

return 0; 
m->m_off = MMINOFF; 
m->nrTlen = 0; 
^ return mtod(m, caddrj); 

struct mbuf *atmjastfm; 

/; 

*^atm_free_msgO frees message memory pointed to by cp. 

atm_free_msg(cp) 
char *cp: 

{ 

ASSERT(IVALIDVP((struct vcte *) cp)); 
atmjastfm = dtom(cp); 
^ m_f Feem (atmjastf m) ; 

/* 

I a V^ a»oc_bytesO is used to allocate memory for data structures 

which are never freed, e.g., svc pcif tables. 
V 

caddrj 

atm_aJIoc_bytes(n) 
return kmem_alloc(n); 

int atm trace to console = 0: 

I Convert address to a hex byte string. The length of the address 

* Is specified with the argument lea 

V 

char * 

atm_mac_sprintf(ap, len) 

u char *ao: 
{ " 

Int |; 

char * C p = atm glob-> static buf; 

static char digits!] =~"01 2345678S5bcdef; 

tor (I = 0; I < len;l++) { 
*cp+ + = digits[*ap >> 4]- 
*cp+ + = dlglts[*ap+ + & OxQ; 

*cp++ = 

} 

*-cp = 0; 

return atm_glob->static_buf; 
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} 
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/* If atm.h 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 
/* 

#lfndef NIU ATM H 
#define NllTATMl4 Included 

#lnclude 'bytes.h' 
#lnclude "unlpduh" 

/* 

* atm mac service Interface (asl). This Is the same as an ethemet 
Mieader so that upper layers can simply assume ATM Is an ethemet 

struct atmmsl { 
u char asl dst[6]; 
u_char asfsrcie]; 
u_short asPtype; 



r 

* Structure of an ATM mac header for aal type 4, this is an 802.6 

* header. 

V 

struct atmjieader { 
struct atm_addr atrndst; 
struct atnrfaddr atm src; 
union { 
struct { 
ujnt mcb pld:6; 

ujnt mcbj3ad:2; 
ujnt mcb_delay:3; 
ujnt mcbJoss:1; 
ujnt mcb~crc:1; 
ujnt mcb~~elen:3; 
ujnt mcbjaad1:16; 
} mcbits; 
ujnt atm mcb long; 

} un mcb; 



#define atm_mcbits un mcb.alm mcb long 
#define atm elen un_mcb.mcbfFs.mcE_elen 
#define atm_crc un_mcb.mcbfts.mcb_crc 
#define atm Joss un_mcb.mcbits.mcb loss 
#define atm_delay un" mcb.mcblts.mcfi" delay 
#define atnrTpid un~mcb.mcbfts.mcb~p!d 
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#define ATM_PID LLC 1 /* protocol ID for LLC */ 
#define ATM MCBITS NOCRC 0x04000000 /* protocol Id 1 */ 
#define ATM~HDR LEN sizeof(struct atm header) 
#define ATM_P AD JSHI FT 24 

/* 

* The only header extension defined is a return port address. The 

* length must be set to ATMERPASIZE. Pad exists to get the 64 bit 

* address 64 bit aligned relative to the atm header. 

V 

struct atm_header_ext { 
u_char atmejen; 
u_char atme~type; 

u~char atme pad [2]; /* need not be zeros (nnbz) */ 

struct atm_addr atme_rpa; /* return port address */ 



#define ATME_RPA_TYPE 112 /* out of SMDS range */ 
#define ATME_RPA_BYTES sizeof(struct atm header ext) 
#define ATME_RPA_WORDS ((sizeof(struct aTm_header_ext) +3)/4) 

r 

* Callers to atm_data reqO must ensure atieast ATM_DATA_REQ_ROOM 

* bytes are available in front of the packet data. 
V 

#define ATM_DATA_REQ_ROOM (ATM_HDR_LEN + LLC_SNAP_LEN +ATME_RPA_BYTES) 

r 

* multicast address structures are linked to atm arptabs which are 

* marked ATF_MULTI. Such entries are not timed out, nor are they 

* freed when underlying VCs are released. atm_delete lan() free's 

* the ATF_MULTI atm_arptab entries and atm_a9dJanQ & 

* atm_niu_to_nluO re-allocate them and re initiate MC VCs for the 

* registered addresses. 

V 

struct mcaddr { 
u_char mc_enaddr[6]; /* multicast address •/ 

u~short mc_count; /* reference count */ 
struct aate *mc at; /* multicast VC V 



#define MCADDRMAX 64 /* multicast addr table length */ 
#define MCCOUNTMAX (32*1024-1) /* multicast addr max 
* reference count */ 

/* 

* atmif, one per atm lan, used by atm Ian layer 
*/ 

struct atmif { 
struct niu arpcom *ati ac; /* contains arp and ifnet 
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* structures */ 

struct atmlf *ati_next; /* linked off pelf structure */ 
u_short atl state; /* basically do we know who 

* we are */ 

u_short ati_mld;/* mid used for multicast frames */ 
u_short atijncasts; /* max # multicasts circuits 

* configured */ 

struct atm_addr ati port; 
struct atnrfaddr atTmac; 
#define acjnac ati_mac.aa_byte[2] 

struct pcif *ati pcif; 

struct aate *atT arptab; /* set at initialization */ 

> nt ati num mcasts; 

struct mcaddr ~ ati_mcaddrs[MCADDRMAX]; 

/• 

/* ati state */ 

#define ATSJNACT1VE 0 

#define ATS_ACTIVE 3 

r 

* global data structure for r/w variables and variables explicitly 

* initialized. 

V 

#include "llc.h" 

struct atm_globs { 
struct fflrhdr *ltrb; 
struct atmif *atmif; 
int atmifn; 
Int atmif_used; 
struct llc_snap llcdef; 
struct atm_addr atm broadcast; 
struct atnTaddr atnrTnuil; 
struct ulptab *atm_ulp; 
Int atmjnltiallzed; 
char static_buf[32]; 

J** 

#ifndef RT68K 

extern struct atm_globs atm globs; 
#define atm_glob (&atm globs) 
#else " 

#define atm_glob atm_get globO 

struct atm_globs *atm~get globO; 
#endif 
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#define LEN_FOR_MBUF_PTRS 0xf5560002 
#define HASH_MULTICAST_ADDRESSM «x)&0xff) 

caddr t atm alloc msgO. atm alloc bytesO; 
#define NATMS ~4 /*"max # of ATM lahs per physical 
* Interface */ 

#define e160_ntoa svc_e1 64_ntoa/* these are really E.164 addresses */ 
#endlf /* NIU_ATM_H •/ 
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/* If nlu.c 

* — 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 
/* 

* Description: This file contains the network Interface portion of 

* the nlu device driver. 
* 

V 

static char sccsid[] = "%A%"; 



#ifndef KERNEL 
#define KERNEL 
#endif 

#ifndef I NET 

#define I NET /* only support Internet addressing */ 
#endif 

#inc!ude ".,/sys/param.h" 
#include \./sys/systm.h* 
#include '../sys/mbuf.h - 
#include "../sys/socketh" 
#inciude "../sys/errno.h" 
#include \./sys/ioctf.h" 
#include "../sys/time.h - 
#lnclude "../sys/kernel.h' 
#include "../sun4c/psl.h* 

#include "../net/if.h" 
#inciude "../net/netisr.h" 
#inciude "../net/route.h" 
#include "../net/"rf_arp.h" 

#inciude V/sun/openprom.h' 
#inciude \./sundev/mbvar.h' 
#include "../sun4c/mmuh" 

#ifdef I NET 

#indude \./netinet/in.h' 

#indude V/netlnet/in systrah* 

#include "../neUnet/in^var.h" 

#include V/netinet/lp.h" 

#endrf 

#inciude "debug.h" 
#lnclude "nlu.h" 
#incJude "unipdah" 
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#include "atm.h" 

#lnciude •Uc.h" 

#!nclude "svc.h - 

#indude "if niuarp.h" 

#includ9 "atmarp.h" 

#include - if nlu.h" 

#indude 'iTniuIo.h" 

#indude *trace.h" 

#lnclude "../net/nit If.h* 

#indude "snit.h" " 

Int aal_trace_enable = 1; 

/* debugging and tracing stuff */ 

#deflne DL1 1 

#define DL2 niu debug >1 

#define DL3 niu~debug>2 

#define DL4 niu~debug>3 

#define DL5 niu debug>4 

#defineTL1 1 

#define TL2 niu_trace>1 

#def Ine TL3 nlu_trace > 2 

#define TL4 niu~trace > 3 

#define TL5 niujtrace>4 

#define DRAIN TIME 4 

/* the SIOCNIUDBUG will set ALL debugging and tracing levels */ 
int niu_debug = 1 ; /* conveys important driver 

* information */ 

int niu_trace = 1 ; /* show excessive detail of the 

* program stream */ 
extern int arp debug; 
extern int arp~trace; 
extern int drvjdebug; 
extern int drv_trace; 
extern int dumpjRag; 

int niumtu = 2000; 

int niu_unit_count = 0; /* total number of sw and hw 

* units installed */ 
struct niu dev niuJnfo[NNIU]; /* network Interface device structure */ 
int niuoutputO. niusoIoctiO; 

r 

* Name: niuoutput 
* 

* Input: *rfp — pointer to network Interface to 

* use. m — mbuf pointer containing packet to be sent 

* dst - ip address of destination. 



* Output: None. 
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* Return: 0 - no error. Error - 

* Unix error code. 
* 

* Description: This routine is called with a frame and a destination 

* address. Appropriate address resoltuion is performed for the 

* destination addresses until a VCI is obtained. The families 

* supported are: AFJNET: An IP address is resloved using ARP 

* Into a 48 bit address. AF UNSPEC: A 48 bit address Is resloved 

* into a 60 bit address and~LLC/SNAP header is added. AF NS: A 48 

* bit address is resloved Into a 60 bit address but no LLC/Sf^AP 

* header Is added. AF CCITT: A 60 bit telephone number is resolved 

* into a VCI using the port address to vci tables. AF DU: A VCI 

* is supplied. No resolution Is performed. The VCI Ts in 

* sockaddr_aal structure. AF INET, AFJJNSPEC and AFJMS frames are 

* encapsulated as per 802.6."Other address families are assumed to 

* be encapsulated already. 

* Note: The above famflies overload existing AF xxx values. Also raw 

* aal frames get queued on the first atmian's ifnet send queue for 

* lack of a better place to put them. 

V 

Int niu_reset on full » 0, niu auto resets = 0; 

int wlllie_panfc = 0; ~ 

niuoutput(ifp t m f dstin) 
struct ifnet *ifp; 
register struct mbuf *m; 
struct sockaddr *dstin; 



{ 



int usetraiiers, s, len, ifunlt, rate; 

struct vcte *vp; 

struct ifqueue *ifq; 

struct sockaddr Idst; 

struct mbuf *mh; 

struct in_addr Idst; 

u_char endest[6J; 

struct niu_arpcom *ac; 

struct aaljaarms *ap; 

struct llc_snap *lc; 

Int " lounrt, error 0; 

iounit « NIUJFUNITJO IOUNITfrfp->if unit); 
/* check if network is up*/ 

TR4(TL3, "nluoutput(%x, %x, %x, af»%d)\n°, 

if p. m, dstin, dstin- >sa family); 
if ((ifp->ifjags & IFFJJPr = = 0 && 

dstin- > sajamily != AFJ)U) { 
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m_freem(m); 

error = ENETDOWN; 

goto rtn; 

} 

Ifunit = ifp->ff unit; 
ac = &nlu_arpcoms[ffunlt]; 
s - spir(!pltospl(nlu lnfo[lounlt].priorfty)); 
#ifdeflNET 
if (dstin->sajamily == AF INET) { 
idst = ((struct sockaddr Th *) dstin)->sln addr; 
DB2(DL2, "aa%d: dest = %s\n\ 

If unit, InerntoaOdst)); 
If (!niu_arpresolve(ac. m, &Idst, 

~ldst.sa_data, &usetrailers)) { 
goto rts; 

} 

((struct ether header *) Idstsa data)->ether type = 

ETHERTYPE IP; ~ 
Idst.sajamily = AFJJNSPEC; 
dstin = &ldst; 
} else 
#endif 

if (dstin- >sajaml!y != AF DU && 

dstin- >sa family != AF NS && 

dstin- >sa Jamil y 1= AF~UNSPEC) { 
printfCaa%d: can't handle af%d\n", ifp->if unit, 

dstin->sa_family); 
mfreem(m); 

niu_info[iounit].stats.errors+ + ; 
error = EAFNOSUPPORT; 
goto rts; 

} 

/* 

* dstin.sa data contains an ethernet header w/o a source adr 

* & type, "{unless AF DU in which case we have a vcL.) 
V 

If ((m->m_off & 0x3) 1 1 M HASCL(m) 1 1 /* make room */ 
(m->mj)ff - MMINOFFT< (ATM DATA REQ ROOM + 

sizeof (struct aal parms)))l 
if ((mh = m get(M_DONTWAn\ MT DATA)) « = NULL) { . 
m_freem(m); 
error = ENOBUFS; 
goto rts; 

} 

mh->mjen = 0; 
mh->m_pff = MMAXOFF; 
mh->m_naxt = m; 
m = mh; 

} 

if (dstin- >sa_family == AFJJNSPEC) { 
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/* add LLC and SNAP */ 

Ic = &(mtod(m, struct He snap *)[-1J); 

*Ic = atrn_glob->llc def; 

lc->llc type = ((struct atmmsl *) dstln->sa data)->asi type; 
m- > m~off - = slzeof (*lc) ; 
m->mjen + = slzeof (*lc); 

len = 0; 

for (mh = m; mh; mh = mh->m next) 

len + = mh->mjen; 
If (dstin->sajamlly « AF UNSPEC 1 1 

dstin->sa family = = Af^NS) { /* get vcl for mac 
address */ 

struct atm header *ah - mtod(m, struct atm_header *); 
struct aate *aat; 

If ((ifp->lfjags & IFF RUNNING) == 0) { 
m freem( m); 
error = ENETDOWN; 
goto rts; 

} 

len + = sizebf(*ah); 
ah-; 

ah->atm_dstaa long[0] = AAT_MAC << 28; 
bcopy(dstln->sa^data, &ah->atm_dstaa byte[2], 6); 
ah- > atm sre = atm glob->atmlf[ifunit].ati mac; 
ah->atm~mcbits = ((ATM_PID_LLC << 2j + 

((4 - (len & 3)) & 3)) < < ATM PAD SHIFT; 
ah->atm_elen - 0; 
m->m_off-= sizeof(*ah); 
m->mjen + = sizeof(*ah); 
aat = atmjind_at(&atm glob->atmrflifunrt]. 

dstin->sa data); " 
If (laat 1 1 l(vp = aat->aate_vcte)) { 

m_freem(m); 

error = EXDEV; 

goto rts; 

> 

If (vp->vcte_state < VCS ESTAB) { 
atm_appehd_packet(vp7 m) ; 
goto rts; 

} 

} else { 

ASSERT(dstin->sa family == AF DU); 

vp = ((struct sockaddr aal *) dstfn)->saaJ vcte; 

if (vp) 

ASSERT(VAUD_VP(vp)); 

m->m_off -= sizeof (struct aal_parms); 
m->mjen + = slzeof (struct aal_parms); 
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ap = mtod(m, struct aal_parms *); 
ap->ap_mid = atm glob->atm!f[lfunft].atl mid; 
ap->ap_vpcl = vp->vcte_ovpcl; 

ap->apjfcte = vp->vcte~bpeak_rate >> 4; /* from 1K bps to 16K 

* bps units *7 
if (vp->vcte aai == 0) 

ap->ap_fiags = AALP RAW CELL | AALP CRC NONE; 
else 

ap->ap_flags = AALP CRC NONE; 
/* top, kludge tfll rev 2 ffed \/f Arfth 960 gets Implemented */ 
If «l(vp->vcte pcif->pc flags & PQF NIU TO NIU)) && 

vp->vcte_pclf->pc sTg->vcte statl = =TVG3 ACTIVE) 

ap->ap_flags | = A£LP_ENABrE XON XOFFf 
vp- > vcte_opackets + + ; 
ffp-> if opackets + + ; 

/* " 

* if multicast then frame must be single threaded so used 

* this atm Ian index + 1 to Indicate In which outbound queue 

* the frame should be placed. 
V 

ap->ap orderq - (vp->vcte flags &VCTEF MCAST CLIENT) ? 

(Int) (vp->vcte_atmif - atnTglob->atmIf) +~1 : 

AALPJJNORDERED; 
ap->ap_orderq = 4; /* lop, nlu bug requires no more than 

* 1 vci per rate queue */ 
ap->ap len = ien + sizeof *ap; 

r 

* Place packet on Interface transmit queue 
V 

ifq = &niu lnfo[iounit].sendq; 
if (IF QFULL(ifq)) { 
DB0(DL2, "niuouput: Interface q full\n°); 

If (nlu_reset_onJull | | niuJnfo[iounit].type = = NIU TYPE SW 1 1 
nlu info[iounlt].board_ld == NIU REV3) { 
ASSERT(wiIlie_panic == 0); 
while (m) { 
m freem(m); 
IF~DEQUEUE(ifq, m); 
lF_DROP(ifq); 

niu_auto_resets + + ; 
(*nTiiJnfo[iounit]. reset) (iounit, 0); 
TR1CTL1, - aa%d auto reset\n". tfp->if unit); 
printffaa%d auto reset\n', ffp->ifjjnlt); 
If (niuJnfo[iountt].type = = NIU TYPEJHW) { 
setup_rxbuf(&niuJnfo[iounit]5T 

} else { 
IF_DROP0fq); 
m_freem(m); 
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} 

error = ENOBUFS; 
} else { 

TR1(TL3, "%d on queue: lfp->lf snd.ifqlen); 
IF_ENQUEUE(lfq, m); 

(*niuJnfo[iounit].sendpkt) (iounlt); 
rts: 

sp!x(s); 
rtn: 

TR3(TL3, "nIuoutput->%d, %d q %d d\n", 

error, ifq«>ifqjen, lfq->lfcLdrops); 
return error; 

} 

r 

* send mbuf chain m on physical Interface pc over VC vp using the 

* aal associated with that vp. mid is the multiplex id for aal 3/4. 

* It is Ignored for aal 5. 
V 

vcoutput(vp f m, mid) 
struct mbuf *m; 
struct vcte *vp; 



int s, len; 

struct ifqueue *ifq; 
struct mbuf *mh; 
struct aal_parms *ap; 

int ~~ lounit = vp->vcte_pcif->pc num; 
int error = 0; 

ASSERT(VAU D_VP(vp)) ; 

s = splr(ipltospl(niuJnfo[iounit].prlority)); 

if ((m->m_off & 0x3) 1 1 M HASCL(m) 1 1 

(m->nToff -MMINOFFf< sizeof (struct aaJ parms)) { 
If ((mh = m get(M_DONTWAiT, MT DATA))""* NULL) { 
m_freem(m); 
error = ENOBUFS; 
goto its; 

} 

mh->m_len = 0; 
ml»m_off = MMAXOFF; 
mh->m_next = m; 
m = mh; 

} 

m->m_off -= sizeof (struct aal_parms); 
m->mjen + = sizeof (struct aS_parms); 
ap = mtod(m, struct aal_parms *); 
ap->ap mid = mid; 
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ap->ap_vpci = vp->vcte ovpcl; 

ap->ap~rate = vp->vcte~opeak_rate > > 4; /* from 1K bps to 16K 

* bps units *7 
if (vp->vcte aai = = 0) 

ap->apj6gs = AALP RAW_CELL | AALP CRC_NONE; 
else ~ ~ 

ap->ap_flags = AALP CRC NONE; 
If ((l(vp->vcte_pcif->pcTfegsfcPCIF NIU TO NIU)) && 
vp->vcte_pcif«>pc sTg && 

vp->vcte~pdf->pc~sig->vcte state == VCS ACTIVE) 
ap->apjags | « AALP_ENABL£ XON XOFFf 
vp- > vcte opackets + + ; ~ 
/* 

* if multicast then frame must be single threaded so used 

* the atm Ian Index + 1 to indicate in which outbound queue 

* the frame should be placed. 

V 

#if0 

ap->ap orderq = (vp->vcte flags & VCTEF_MCAST CLIENT) ? 
(int) (vp->vcte_atmif - atnTglob->atmif) + 1 : 
AALPJJNORDERED; 
#endif 

ap->ap_orderq « 4; /* top, niu bug requires no more than 

* 1 vci per rate queue */ 
for (len = 0, mh = m; mh; mh = mh->m next) 

len + - mh->mjen; 
ap->ap len = len; 
/* 

* Place packet on interface transmit queue 

V 

ifq = &niu info[iounit].sendq; 
if (IF_QFULL(rfq)) { 
DB0(DL2. Vcouput: interface q fuIIXn - ); 
if (niu_reset on full 1 1 

niuJnfo[ibunft].type = = NIU TYPE SW 1 1 
niu infofiounitj.board id = ="NIU REV3) { 
ASS"ERT(willie panic == 0); 
while (m) { 
m_freem(m); 
IF DEQUEUEpfq, m); 
IF~DROP(rfq); 
} " 

niu_auto_resets+ + ; 
(*nlu_lnfo[lounit].reset) (iounit, 0); 
TR1(TL1, "niu%d auto reset\n", Iounlt); 
printf("niu%d auto reset\n", iounft); 
if <niujnfo[iounft].type NIU TYPE HW) { 
setup_rxbuf(&niuJnfo[iounit]J; 

} else { 
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IF_DROP(ifq); 
m_freem(m); 

error - ENOBUFS; 
} else { 



TR1(TL1. »%d on queue: '. ffq->Wq len)- 
IF_ENQUEUE(ifq t m); ^~ ' 

(*nluJnfo[Iounlt].sendpkt) (iountt); 
rts: 

splx(s); 

TR3(TL1, Vcoutput->%d. %d q %d d\n" 
r a t,?,™ r ^ >if ^ ,en ' »q->Hq_drops); 



return error; 
} 



9? 

if niu.c 



«nt niu_esr = 0; 

niu_restart_sends(unit) 

struct atmrf *atp; 

If (!niu_esr) 
return; 



Se^^rf^ >svc - pciffunit, ' pc - atmif; 

if (((struct Ifnet *) atp->ati ac)->ff snd.ifq_len) 
(*niu_info[unft].sendpkt) (unit); * ^ ' 



atp = atp->ati_next; 
} 

/* 

* Name: niusoioctl 

?' b ££LJ!fi " po,nter to netw ork Interface to use. cmd 

. • COmmand ^quested, 'data - data associated wfthTri command. 

I 0utput: * data ~ data may be filed In by certain commands. 

* Return: 0 - no error. Error - Unix error code. 

* 2n^. riptl0r,: 1 ? b b network Interface loctl routine An Ifrea 
^structure must be used to access this routine. 

niusoioctl (ifp, cmd, data) 
register struct ifnet *ifp; 
Int cmd; 
caddr t data; 
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Int error ■ 0. 1, s, svc timeout 0; 

int tfunlt = |fp->ff unit- 

extern Int atmarpjimeol , atmarp timeo2; 
struct Ifraq *tfr = (struct Ifreq *) data; 
struct Ifaddr *tfa = (struct Haddr *) data; 
struct niu arpcom *ac = (struct niu arpcom *) ffp; 
struct dblnfo *dbp; 
struct mcaddr *mca; 
struct atmlf *atp; 

TR2CTL3, "aa%d(%x): niusoioctl entered\n\ ffunit, cmd); 

switch (cmd) { 

case SIOCSIFADDR: 
/* set the Interface Ip address */ 
TR1(TL4, "aa%d: loctl SIOCSIFADDR\n', Ifunft); 
switch (lfa->ifa addr.sa family) { 
#ifdeflNET " " 

case A FJ NET: 
niu_arpcoms[ifunit].ac_ipaddr = 
IA_SlN(ifa)->sin_addn 
* ifp->lf_flags |= IFF UP; 
break; 

#endif 

default- 
break; 

} 

break; 

case SIOCSIFFLAGS: 
/* set Interface flags */ 

TR3(TL4, "aa%d: ioctl SIOCSIFFLAG (%d)flag=%d\n" f 

ifunit, ifp->if_flags, tfr->ifr flags); 
rfp->if_flags = rfr->ifr flags; 
if (*rfp->lfj!ags & IFFjJP) { 
struct niu_dev *niu; 

niu = &niuJnfo[NIU IFUNIT TO lOUNIT(ifp->lf unit)]; 
If (niu->type = = NlQ TYPElHWJ" { . . " 

setup_rxbuf(nlu); 

} } 
break; 

case SIOCGIFFLAGS: 
/* get interface flags */ 

TR2(TL4, "aa%d: loctl SIOCGIFFLAG flag=%d\n" t 

Ifunit, ifp->if flags); 
rfr->ifr flags = Tfp->if flags; 
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break; 



case SIOCGETPORT: 
/* get port address */ 

TR3(TL4, *aa%d: ioctl SIOCGETPORT port=%8x%8x\n", ifunit, 
atm_g!ob->atmif[ffunltl.ati portaa long[0], 
atm g!ob->atmff[lfunltj.atrportaalong[1]); 
ifr->ffr addr.sa family = AF CCITT; ~ 
bcopy^&atm__giob->atmffClfunlt].atl port, 
ifr->ifr addr.sa data, 
sizeof (struct atm addr)); 
break; 

case SIOCNIUDBUG: 
/* set debug level for the entire niu device */ 
dbp ~ (struct dbjnfo *) lfr->ffr data; 
niu_debug * db£>niu debugf /* network Interface */ 
niujtrace = dbp->niu_trace; 
arp~debug = dbp->arp_debug; /* arp */ 
arp_trace = dbp->arp_trace; 
drv_debug - dbp->drv_debug; /* /dev/nlu */ 
drv_trace = dbp->drv trace; 

DB3(DL2, "aa%d: ioctl "SlOCSNIUDBUG niu=%d %d\n". 

Ifunit, niu_debug, nlu trace); 
DB3(DL2, -aa%d: Ioctl STOCSNIUDBUG arp=%d %d\n", 

ifunit, arpjdebug, arp_trace); 
DB3(DL2, 'aa%d: ioctl SIOCSNIUDBUG drv-%d %d\n\ 

ifunit, drv_debug, drv trace); 
break; 

case SIOCGIFADDR: 
case SIOCGMACADDR: 

/* get the interface ip address */ 

TR1(TL2, "aa%d: ioctl SIOCGIFADDR\n\ ifunit); 

bcopy(&niu_arpcoms [ifunit] .ac atmif->ati mac.aa byte[2] f 
lfr->ifr_addr.sa_data, 6); " " ~ 

break; 

case SIOCSMACADDR: 
/* set the interface ip address */ 
TR1 (TL2. "aa%d: ioctl SIOCSIFADDR\n". ifunit); 
bcopy(ifr- > if r_addr.sa_data, 

&nlu_arpcoms[ifunlt].ac atmif->atl macaa byte[21 f 6); 
break; " " 

caseSIOCGAATIMEOl: 

bcopy(&atmarp Jimeol , &ifr->ifr metric, sizeof (int)); 
break; " 

case SIOCSAATIME01: 

bcopy(8tfr->ifr_metric, &atmarp timeol, sizeof (Int)); 
break; 

case SIOCGAATIME02: 
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bcopy(&atmarp_timeo2, &ifr->tfr_metric f slzeofflnt)); 
break* 
case SIOCSAATIME02: 
bcopy(&ifr->ifr_metric, &atmarp_tfmeo2, sizeof(int)); 
break; 
case SIOCTIMEOUT: 
If ((atp = atm glob->atmlf) = = 0) { 
error = ENXIO; 
break; 

} 

s = splnetO; 

untimeout(svc_timeout atm_glob->atmif[ifurdt].atlj)cif); 
svc timeout(atm_glob->atmif[ifunit].ati_pcif); 
for J t atp < &atm glob->atmif[atm g!ob->atmif used]; 
atp++){ 
if (atp->ati_state = = ATSJNACTIVE) 

continueT 
atm arptimer(atp); 

} 

splx(s); 

break* 
case SIOCADDMULTI: 

TR1 (TL4. "aa%d: loctl SIOCADDMULTI\n", ifunlt); 

error = niu_addmulti('rfp, ifr->ifr_addr.$a_data); 

break* 
case SIOCDELMULTi: 

TR1(TL4 f "aa%d: ioctl SIOCADDMULTI\n\ ifunit); 

error = niu_delmulti(ifp t ifr->ifr_addr.sa_data); 

break* 
case SlOCSPROMiSC: 

ifp->ifjlags ~- IFF_PROMISC; 

printf( tt aa%d promiscuous %sabled\n", Ifunit, 

ffp->if_flags & IFF_PROMISC ? 'en' : "dis"); 

break; 
case SIOCG STATE: 

/* get signaling vc state */ 

TR2(TL4, - aa%d: ioctl SIOCGSTATE state =%d\n'. ifunit, 
atm_glob->atmif[ifunit].ati_pcif->pc sig->vcte state); 
ifr->ifr_rnetric = 

atm_glob->atmif [ifunit] .ati pcif->pc sig->vcte state; 
break; 
case SiOCSSTATE: 
/* get signaling vc state */ 

TR2(TL4, "aa%d: Ioctl SIOCGSTATE state=-%d\n", Ifunit, 
atm_glob- > atmif [ifunit] .ati pcif- > pc_sig- > vcte_state) ; 

if (ffr->rfr_metric < VCS INACTIVE 1 1 
ifr->ifr_metric > VCS ACTIVE) 
error = EINVAL; 

else 

svc_new_state(atm_gl ob- > atmif [ifunit] . ati^pcif- > pc_sig, 
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ffr->ifr metric); 

break; 
default: 

DB2(DL2, "aa%d: ioctl bad command =%x\n", 

Ifunft, cmd); 
error = EINVAL; 

} 

return (error); 



r 

* Find a multicast entry in the multicast filter for atm Ian, atp. 
V 

struct mcaddr * 
niu_findmulti(atp, mac) 

struct atmif *atp; 

u char *mac; 

{ ~ 
int i; 

for (i = 0; I < atp->ati_num mcasts; I++) 
If (bcmp(atp->ati_mcaddrs[l].mc enaddr, mac, 6) 0) 
return &atp->ati mcaddrs[i]; " 
return 0; 

} 

/* 

* Add a multicast address to multicast filter for atm Ian, atp. 
*/ 

niu_addmulti(rfp, mac) 
struct ifnet *ifp; 
u char *mac; 

{ 

Int i, s, error 

struct aate *at; 
struct mcaddr *mc; 

struct atmif *atp = ((struct niu_arpcom *) ifp)->acatmif; 

if ((mac[0j & 0x1) 0) 

return EINVAL; /* not a multicast address */ 
mc = niu findmulti(atp, mac); 
s « spllmpO; 
if (mc) { 

if (mc->mc_count < MCCOUNTMAX) { 

mc- > mc_count + + ; 

spix(s); 

return 0; 
} else { 

splx(s); 

return ENOSPC; 
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} 



} 

if (atp->ati num_mcasts = = MCAOORMAX) { 
spix(s); ~ 
return ENOSPC; 

} 

mc = &atp->ati_mcaddrs[a£p->ati_num_mcasts]; 
mc->mc_count = 1; 
bcopy^ic, mc->mc_enaddr, 6): 
at = mc->mc at = aim find atfatp, mac): 
If (at = = 0) {~ " " 

spbc(s); 

return ENOSPC; 

} 

at->aate_flags | - ATF_MULT!; 
atp->ati num mcasts++; 
splx(s); ~ 
return 0; 



r 

* Delete a multicast address from multicast filter for atm Ian, 
V 

niu_delmultl(lfp, mac) 

struct ifnet *ifp; 

u char *mac; 
{ " 

struct mcaddr *mc; 
int I, s; 

struct aate *at; 

struct atmif *atp = ((struct niu_arpcom *) ifp)->ac atmff; 



mc = niu findmu!ti(atp, mac); 
If (mc = =~0) 

return ENXIO; 
s = spIimpO; 

if (-mc-> mc count > 0) { 

splx(s); 

return 0; 
} else if (at » mc->mc_at) { 

ASSERT(at->aate flags & ATF MULTI); 

at->aatejlags &= -ATF^MULTl; 

atm aate free(at); 
} ~ " 

bcopy(&atp->atl_mcaddris[-atp->ati num m casts], mc, sizeof(*mc)); 

splx(s); 

return 0; 
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/* 

* go steal an ethemets low order 2 bytes and append It two 

* Adaptive's IEEE prefix. 
V 

unsigned Int def_enaddr[2] = {0x0080b2e0, 0x00010000}; 

niu_get_enaddr(unlt, enaddr) 
ujnt unit: 
u~char *enaddn 

{ ' 
struct tfnet *ifp; 

extern struct ffhet *ifnet; 

bcopy(def enaddr, enaddr, 6); 
for (ifp = ffhet; ifp; ffp = lfp->if next) 
if (rfp->if mtu « 1500) { ~ 

enaddrfa] = (((struct niu arpcom *) ifp)->ac_enaddr[3] & Oxlf) | OxeO; 

enaddr[4] = ((struct niu_arpcom *) lfp)->ac_enaddr[4]; 

enaddr[5] - ((struct niu arpcom *) ffp)->ac enaddr[5]; 

break; 

} 

enaddrfO] = (u_char) unit < < 1 ; 



r 

* This routine just looks up the input vcl and dispatches the frame 

* to the appropriate input routine based upon vci. Signaling and 

* raw user access does not necessarily use 802.6 framing. 

int svc_send releases » 1; 

deHver_packet(unit f mO, vci) 

int ~~ unit; 

struct mbuf *m0; 

u_short vci; 

struct vcte *vp; 

struct pcif *pc; 

int s; 

int pjen; 

plen = mjen(m0); 

* 

aaMrace m(m0, plen, 1, vcl); 
s = spllmpO; 

pc = &svc_glob->svc_pcff[unlt]; 
if (pc- > pc_raw_vp) ^ 

pc->pc_rawjyp->vctejpackets+ +; 
pvcjnput(p<>>pc raw~vp, mO); 
} elself (vp = Ivpcljo vcte(pc, vcl)) { 
if (VCSJJATAJNDOK & VCS_TO_VMASK(vp->vcte_state)) { 
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""-67- 

ASSERT(VAUD JJLP (vp- > vctejilp)) ; 

vp->vcte Ipackets+ + ; 
(*vp->vcTe_ulp->ulp_data) (vp. mO); 

} else 
m freem(mO); 
} eiseTf (svc_send_releases && pc->pc_sig) { 
struct release *pdu; 
m_freem(mO); 

pdu = (struct release *) atm_alloc_msgO; 
pdu->lmi proto = LMI_PROTOCOL; 
pdu->!mi~pdu type = IDUJNVAUD PDU; 
pd u- > I mrcrefjy pe = LMIJ2REFTYPE_PVC; 
pdu->lmi cref value = vci; 

LMI SET "ELEMENT (&pdu- > lmi_cause, LMI RELEASE_CAUSE, 

"VCI UNACCEPTABLE); 
svc xduTpc. 0, pdu, sizeof *pdu); 

} " 
splx(s); 

} 

/* 

* niu_snttifyO makes a copy of mO, converts the 802.6/SNAP header 

* into an ethernet header and calls snftJntrO- 
V 

struct nit_if niu nit; 
u_short enet_hdr[7] ; 

niu snitify_8026(ifp. m, hlen, promise) 
struct ifnet *ifp; 
struct mbuf *m; 

{ 

int ad]; 

u_char *sp; /* start of destination adr in 802.6 
* header */ 

ASSERT(hlen > = 20); 
if (m->mjen < hlen + 3) 

return; /* not enough for He */ 
sp = mtod(m, u_char *); 
bcopy(&sp[2], enet hdr, 6); 
bcopy(&sp[2 + 8],"&enet hdr[3], 6); 
If (spfhlen] = = (uchar) Oxaa) { 

bcopy(&sp[hlen + 6], Aenetjidrie], 2); 

adj = hlen + 8; 

bcopy(&sp[hlen], &enetjTdr[6], 2); 
adj = hlen + 3; 

} 

if (m->m Jen < adj) 
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return; 
m->mjen -« adj; 
m->nfoff + = adj; 

niu_nithif header = (caddr t) enet hdr 
niujiiLniThdrien = 14; 
niujiitniTbodylen = mjen(m) - 14; 
niu_nlt.nff promise = promise; 
snif intr(ifp, m, Aniujift); 
m->m Jen + = adj; 
^ m->rcToff -= adj; 

int dump len = 64; 

Int dumpjimit = 0; 

dumpjrame(s, dp, words) 
char *s; 
Int *dp; 
int words; 

{ 

if (dumpjimit = = o) 

return; 
printfC%s s); 
if (words > dumpjimit) 

words = dumpjimit; 
while (words-) 

prfntfC%x\ *dp++); 
printfCXn 11 ); 

int dumpbuf[64]; 
int dumplen = 64; 

dump_chain(s, m) 
char *s; 
struct mbuf *m; 

{ 

Int left = mjen(m); 

if (left > dumplen) 
left = dumplen; 

m_copydat(m, (char *) dumpbuf, left); 
left = (left + 3) / 4; 

dumpjrame(s, dumpbuf, left); 

mjen(m) 
struct mbuf *m: 

{ 

int Jen; 
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""-69- 

* . . 

for (len = 0; m; m = m->m_next) 

len + = m->mjen; 
return len; 

} 

atm_arploctl(lfunlt. cmd, data) 
Int cmd; 
caddr t data; 

{ 

struct arpreq *ar = (struct arpreq *) data; 

struct aate *at; 

Int s, error » 0; 

if (ar->arp_pa.sajam0y ! = AFJJNSPEC 1 1 
ar->arp ha.sa family 1= AF CCITT) 
return (gAFNOSUPPOFH*); " 

s = splimpQ; 

at = atm_arptabJook(&atm glob->atmif[ifunlt] ( 

ar->arp pa.sa dataj; 
If (at = = NULL)" 

error - ENXIO; 
else if (ar->arp_pa.sa data[0] & 0x01) 

error = EINVAL; 
else if (cmd = = SIOCDARP) 

atm_aate_f ree(at) ; 
splx(s); 
return error; 



calc_mlen(m) 
struct mbuf *m; 

{ 

Int len = 0; 

TR0(TL2, "calc_mien: caHed\n"); 

while (m) { 
len + = m->mjen; 
m = m->m next; 

} 

DB1 (DL3, "calc mien: len=0x%x\n", len); 
return (len); 



m_copydat(m, buf, len) 
struct mbuf *m; 
char *buf; 
int len; 
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""•70- 

int J; 
while (len && m) { 
j = len; 

If Q > m->m len) 
j = m->mlen; 

bcopy(mtod(m, caddr t), buf, J); 
buf + = J; 

len -= J; 

} 

m = m->m next; 

} 

return len; 



aaLtrace_m(m, tlen, In, vci) 
stmct mbuf *m; 

{ 

int S ; 

If (!aal_trace_enable) 

return; 
s = spl70; 

atm trace J>uf(m, rncopydat, IF TRACE LOG, tlen, in, vcf); 
splx(s); ~ - " 



WO 94/07316 



if niu.h 

/* If nlu.h 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 
/* 

/* static char sccsid[] = "©(#) If niu.h 1.12@(#)"; */ 
/* 

* The aa) Interface Is Implemented as messages send (asynchronously 

* between the MAC and aal layers. The aal_parms structure proceeds 

* frames transmitted and received. It Is the complete Interface 

* between the aal layer and the aal user. Rather than define some 

* VC parameters at circuit setup time and pass other per frame 

* parameters with each frame, all parameters are passed with each 

* frame. Thus, at the loss of some performance, the Interface 

* betwen the H/W NIU (and 960 OS) and the host is simplified. 
* 

* To do: Average rate metering parameters will be added when we figure 

* out how to use them, frame level CRC should be specified but 

* current chips have a mode bit for CRC. 

struct aal_parms { 
vpcit ap_vpci;/* vpci to be operated upon */ 
u short ap_mid; /* mid to use with frame */ 
u~short apjen; /* packet length (excluding aalparms 

* and */ 

/* pad bytes if AALP_CRCSMDS) */ 

u_short ap rate;/* burst rate for frame divided by 

* 1024 */" 

u_char ap_orderq; /* Identifies an ordered send 
" * queue. Frames */ 
/* with the same orderq may not be interleaved. */ 
/* AALP UNORDERED indicates no restrictions */ 
u char " apjlags; /* AALP CRCxxx •/ 

}: " 

/* ap crc32 values */ 
#defineAALP CRCNONE 0 
#define AALP~CRC_ADAPTIVE 1 
#define AALP_CRC SMDS 2 
#define AALP RAW CELL 4 

#define AALP~ENABUE_XON_XOFF 8 /* enable xon/xoff higher 
* layer-*/ 

#define AALP_LOOP_VCI 0x10 /* loop rev frames at 960 */ 

/* ap rate value to specify maximum link rate */ 
#define AALPMAXRATE (~0) /* all one's */ 

/* ap_orderq value if frame has no ordering constraints */ 
#define AALP UNORDERED 0 



* niuoutputQ sockaddr used for raw aal access with AF_DU. 
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~-72- 

* saal vcte must reference a valid vcte. 
7 

struct sockaddr aai { 
u_short "saal family; 
u_short saaTpad2; 
struct vcte *saafvcte; 
char saal pad6{6]; 



struct niujiesc { 



}; 



u_char 
u_char 
u short 
ujnt 
u~short 
u~"short 
u~int 



status; 
nluaJ; 
reserved; 
pkt addr; 
size; 
vcl; 

chain ptr; 



/* used for SIOCNIUDBUG loctl */ 
struct dbjnfo { 

char niujtebug; 

char niujtrace; 

char arp~ debug; 

char arp_trace; 

char drvjdebug; 

char drv~trace; 

}; 



/* MTU size */ 
#define AAMTU 



9188 



/* receive control registger */ 
#define RCNTL REG 0 
#define RCNTLlDLE INTR 
#deflne RCNTTTFILL INTR 
#define RCNTL PAS§ IDLE 

*ceil*/ " 
#deflne RCNTL STOP IDLE 
#define RCNTL~RESET 0 

* spill mode */ 
#define RCNTL_MASK 0xc7 /* bits 3-5 unused */ 



0x80 /* rx fill interrupt */ 
0x40 /* rx idle Interrupt */ 
0x04 /* go through idle on every 

0x02 /* stop on Idle */ 
01 /* reset rx fifo, abort cell, 



/* receive status register 1 */ 
#define RSTAT1_REG 1 

#define RSTAT1 LIGHT 0x80 /* oc fiber light present V 
#define R STAT 1 ~FI FO_HALF 0x40 /* rx fifo half flag */ 
#define RSTAT1 FIFO FULL 0x20 /* rx fifo full flag */ 
#define RSTAT1~FIFO~EMPTY 0x20 /* rxfrfo empty flag */ 
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#define RSTAT1 VIOLATION 0x04 /* rx violation */ 
#define RSTAT1_MASK Oxec /* bits 0.1,4 unused */ 

/* receive status register 2 */ 

#define RSTAT2 REG 2 • 

#define RSTAT2 IDLE 0x80 /* rx is Idle */ 

#define RSTAT2_FlFO_OVR 0x40 /* rx fifo overflow */ 

#define RSTAT2 CMD_OVR 0x20 /* rx command overflow */ 

#define RSTAT2 CMD_RECV 0x10 /* rx command received */ 

#define RSTAT2~COMMAND OxOf /* rx command, 4 bits */ 

#define RSTAT2~INTR_MASK OxdO /* rx Interrupt mask */ 

/* transmit control register */ 

#def»ne TCNTL_REG 3 

#define TCNTL RESET 0x80 /* tx reset */ 

#define TCNTL LOAD 0x40 /* load tx fifo */ 

#define TCNTL~SOC ENBL 0x20 /* start of cell enable */ 

#define TCNTL"ENA5LE 0x10 /* enable send from fifo */ 

#define TCNTL~COMMAND OxOf /* tx command •/ 

/* transmit status register */ 
#defineTSTAT REG 4 

#define TSTAT'FIFO FULL 0x80 /* tx fifo full */ 
#define TSTAT~FlFO~HALF 0x40 /* tx fifo half */ 
#define TSTAT~FIFO~EMPTY 0x20 /* tx fifo empty */ 
#define TSTAT_MASK OxeO /* bits 0-4 unused */ 

#defme MAXJNTRJTIME 200 

/* dma controller control/status */ 

#define DMAC INT PEND 0x00000001 /* interrupt pending */ 
#define DMAC~ERR_PEND 0x00000002 /* error pending */ 
#define DMAC DRAINING 0x0000000c /* draining D cache */ 
#define DMAC'INT EN 0x00000010 /* interrupt enable */ 
#define DMAC~FLUSH 0x00000020 /* flush buffer */ 
#define DMAC"SLAVE ERR 0x00000040 /* slave error */ 
#define DMAC~RESET~ 0x00000080 /* reset DMA */ 
#defme DMAC^WRITE 0x00000100 /* 1 = memory write; 0 = 

* memory read V 

#define DMAC EN DMA 0x00000200 /* enable dma */ 
#define DMAC"~EN~CNT 0x00002000 /* enable counter */ 
#define DMAC"TC~ 0x00004000 /* terminal count */ 
#define DMAC~ALE AS 0x00100000 /* 1 - addr latch enb; 0 

* = addr strobe */ 

#define DMAC LANCEJERR 0x00200000 /* E channel error */ 
#define DMAC~FASTER 0x00400000 /* fast access for D 

* channel */ 

#define DMAC TCIJDIS 0x00800000 /* TC interrupt disable */ 
#define DMAC~EN~NEXT 0x01000000 /* enable next */ 
#define DMAC_DMA_ON 0x02000000 /* DMA on */ 
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#define DMAC AJ.OADED 0x04000000 /» address loaded */ 
#deflne DMAC_NA_LOADED 0x08000000 /* next address loaded */ 
#define DMACJDEVJD 0x10000000 /* device Id */ 

#define DMACJNTR MASK 0x00000003 /* DMAC interrupt 

* pending mask */ 

/* dma address */ 

#define DMACADDRJ?EG 6 

/* dma next address */ 

#define DMAC_ADDRNXT_REG 7 

/* dma count */ 

#define DMAC_COUNT_REG 8 

/*. dma next count */ 

#deflne DMAC_CNTNXT_REG 9 

#define SW_NUM_SWREGS 10 /* number of registers on sw 

* nlu */ 

#define NUM_SWREGS 3 /* number of registers on sw 

* niu */ 

#define NUM_SWINTR 1 /* number of Interrupts on sw 

* niu */ 

struct niu_addr_reg { 
u_char *rcntl_reg; /* receive control register */ 
u_char *rstatl_reg; /* receive status 1 register */ 
u_char *rstat2 reg; /* receive status 2 register V 
u_char *tcntl reg; /* transmit control register */ 
u_char *tstat_reg; /* transmit status register */ 

struct niu_value_reg { 
u_char rcntlreg; /* receive control register */ 

u_char rstatl reg; /* receive status 1 register */ 
u_char rstat2_reg; /* receive status 2 register * / 
u_char tcntl_reg: /* transmit control register */ 
u_char tstat_reg; /* transmit status register */ 

it 

struct hw_niu_reg { 
ujong ~~ *dma_reg;/* LSI dma status register */ 
ushort *attnjeg; /* nlu attention register */ 
ujong *base_reg; /* niu base register */ 
u_short *intr_reg; /* niu interrupt acknowledge 
* register */ 

u short *lock_reg; /* niu dma lockout register */ 
ujong dma_vaJue; /* local copy of dma status 
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* register */ 
u_short attnj/alue; /* local copy of niu 

* attention register */ 
u long basej/alue; /* local copy of niu base 

* register */ 

}; 

struct dmac addr reg { • 
ujong *status reg; /* status control register */ 

ujong *addr_reg; /* addressjegister^*/ ^ 

u long ~ '* 

u~long 
u~long 

}; 

#define NUM_DESC 1 /* up to 1 descriptors In 

♦"chain */ 
typedef struct { 

caddr_t dma_addn 

int size; 
} DMA_DESC_BUF; 

struct dmac_value reg { . 
ujong ^ status reg; /* status control register */ 
u long addrjeg; /* address register */ 

ujong next address_reg; /* next address register / 

u long count reg; /* count register */ 
ujong next count reg; /* next count register */ 

}; 

struct niu_stats { 
u long ip_opkts; /* number tx ip packets */ 

u long Ipjpkts; /* number rx Ip packets */ 

u~long arp_opkts; /* number tx ip packets */ 

ujong arp ipkts; /* number rx ip packets */ 

u long drvTopkts; /* number tx driver packets */ 
u~long drv Ipkts; /* number rx driver packets */ 
ujong cnTerrors; /* total number crc errors */ 
u long errors; /* total number misc errors */ 
ulong ailocd Jailed; /* number of alloc _desc 

* failures *7 

ujong finddescjailed; /* number of mismatched 
* tags */ "~ 

}; 

/* packet direction */ 

#define NIU_RECEIVE 0 /* host receiving packets 

* from niu */ 

#define NIU TRANSMIT 1 /* host trasmitting packets 

* to niu */ 
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typedef struct { 
int infuse; 
Int cmd tag; 

struct mbuf *m; 
*nt num desc; 

caddr t desc addn 

dma "Desc buf "*desc _ptn 

caddr t ~~ data addn 
} DMA DE"3C; 

#define NUM_DMA_DESC 1 1 

#define COMMAND_StZE 16 

#define NO COMMAND 0 
#define RESET_CMD 1 
#define STATUS CMD 2 
#deflne CLRSTATS CMD 3 
#define RX DATA CMD 4 
#define 7XJDATA~CMD 5 
#define CLR INTFf CMD 6 
#define RESET_QJ3MD 7 
#define WORKAROUND CMD 8 
#define BOARDJD_CMD~ 9 

#define CMD INTR OFF 0x00 
#define CMD~INTR~ON 0x01 

tH ef l ne S^2-5 RC - MASK 0x06 /* «rame level crc V 
#deflne CMD_CRC ADAPTIVE 0x02 

#define CMD CRC~SMDS 0x04 

#define CMD^CRC^NONE 0x00 

#define CMD~AAL MASK 0x18 

#define CMDAAL4 0x00 /* default is aal4 */ 

#define CMD AAL5 0x08 /* not yet Implemented */ 

#define CMD AAL__RAW 0x18 /* send raw cell ala s/w niu V 

Sfr ,ne ^S-F^^ 0 ^ 0 ^ 0x20 /* enable xon/xoff V 
#define CMDJ.OOPJ/CI "0x40 /* loop rev frames at 960 */ 

typedef struct { 

u_char paramfCOMMAND SIZE - 41: 

u_short tag; *" 
u_char flags; 
u_char command; 

} COMMAND; 

typedef struct { 
u_char paramfCOMMAND SIZE - 81: 

ujnt board Jd; 
u_short tag; 
uchar flags; 
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u char command; 
} " BID_CMD; 

typedef struct { 

caddr_t dma_addr, 

u short vci; " 

u~short mid; 

u short size; 

iTchar order_q; 

u~char rate_q; 

u^short tag;* 

u~char flags; 

u~char command; 

} " RXCMD; 

typedef struct { 

caddr_t dma_addn 

u_short vci; 

u_short mid; 

u~short size; 

u~char order_q; 

u~char rate_q; 

u~short tag;" 

u^char flags; 

u char command; 
} " TXCMD; 

#define CMD Q SIZE NUM DMA_DESC 

#define START CMD Q( q ) (&((q)->cmd a[ 0 ])) 
#define CUR CMD <5{ q ) (&((q)->cmd_q[ (cO;>cmd I elem ])) 

#define END~CMD~Q( q ) (&((q)->cmd q[ CMD Q Sl^ - 1 ])) 

#define NEXT CMD_Q( elem ) if (+ + (elem) > = CMDQ_SIZE)\ 

(eiem) = 0; 

typedef struct { 

Int cmd_elem; 

COMMAND *cmd q; 
} CMD_Q; 

typedef struct { 

u_char crc^err, 

u~char parRy^err; 

u"char buf ovr, 

u~char buTavafl; 

u_char pkTdrop; 

u char cell drop; 

} " HWNILTSTATS; 

typedef struct { 
u_short rx_packets; 



WO 94/07316 



if niu.h 

""-78- 

u i short tx packets; 
HWNIU STATS " stats; 
u_char~ reserved [61; 
} NIU_STATUS; 

typedef struct { 

caddrj cmd_start; /* command q start */ 

caddrj cmd~end;/* command q end */ 

caddrj done^start; /* completed q start */ 

caddr"t done end; /* completed q end */ 

caddrj status start; /* status location */ 

} HOST_BASE; 

#deflne MAP CMD Q 0 

#define MAP DONE Q 1 

#define MAP~STATU3 2 

#define MAP BASE 3 

typedef struct "{ 
caddrj basejJma; /* host base dma address */ 
caddrj statul_dma; /* status dma address */ 
caddrj cmdjJma;/* cmd q dma address */ 
caddrj done" dma; /* done q dma address */ 

} DMAJVDBR; 

/* board Ids */ 
#define NIU REV2 0 
#define NIU~REV3 1 
#define PNIUJ*EV1 2 
#definePNIU REV2 3 
#define PNIUJREV3 4 
struct niujiev { 
u_char type; 

ushort tag; /* tag for each command */ 

CMDJ3 cmdjj; /* command q */ 

CMD Q done q; /* completed q */ 

NIU STATUS status; /* hw niu status location */ 

HOST BASE base; /* host/niu io base structure */ 

DMA_ADDR dma addr; /* mapped dma address */ 

Int priority; interrupt priority */ 

struct hwjiiujeg nlureg; /* address of registers on 

* niu board */ 

struct niu stats stats; /* niu statistics */ 
DMA_DE5C descfCMD Q SIZE]; /* descriptor pool */ 
Int Intrjimeout; /* Interrupt timeout counter */ 

struct niujiddrjeg niu addr; /* address of registers on 

* niu board *7 

struct niuvalue reg niu value; /* contents of registers on 

* niu board */" 

struct dmac addr reg dmac addr; /* address of registers on 

* L64853A SBus controller */ 
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struct dmac value reg dmac value; /* contents of registers 

* on L64853A SBus 

* controller */ 

Int (*sendpkt) 0; /* hw specific routine to 

* send queued pkts */ 

Int (*reset) 0; /* hw specific routine to 

* reset hw * / 
#define NIU TYPE SW 1 
#define NIU^TYPE^HW 2 

u_short ~ direction; /* receive or transmit 

* packets */ 

Int board Id; /* nlu board revision */ 

Int intr state; /* Is in Interrupt state */ 

Int postjxbuf; /* count of nc buffers to be 

* posted */ 
struct tfqueue sendq; 
Int macaddr[2]; 



extern struct niu_dev niuJnfpQ; 

extern int cell flag; /* set for trasmission of raw 53 byte 
* cells */ 

#define NIU IFUNIT TO lOUNIT(ifunit) (atm glob- >atmif [If unit] .ati_pcif->pc_num) 
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/* IfTLC 
* 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

* 



V 




#lfdef CERNEL 



#include "ipcdef.h" 
#indude "nerdef.h* 
#indude < global def.h> 
#include <driver.Ti> 

#undef Imjnft 

#else /* ifndef CERNEL */ 

#include <std!nLh> 
#include < global def.h> 
#include <ITC lf.h> 
#include <drivei\h> 

#include <RT_if.h> 
#include <timer.h> 
#include <RT_def.h> 
#include <enetjf.h> 
#inciude <net_def.h> 

#define ERRLOG printdbg 
#define printf printdbg 

#end n /* rfdef CERNEL * / 



#lnclude °unlpdu.h" 
#include "nnipdus.h" 
#lnclude "altask_gl.h" 
#indude "slgtask gl.h" 
#lnclude "svctask gl.h" 
#lnclude "svc ».h r 
#lndude "snmp ind.h" 
#include "AAL £h" 
#indude \vdb~lf.h" 
#indude "q.h"~ 
#indude "bitah" 
#indude 1m.h M 



ImjcbJ NmJnitQ; 
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#ifdef CERNEL 
#include <stdio.h> 

main(argc, argv, environ) 

int argc; 

char *argv[]; 

char **environQ; 

{ 

tlNT32 generic; 

1INT32 instance; 

t!NT32 status; 

tUINTB testjnode; 

generic = TID_LM; 
instance = 0; 

If ((status = SetTId (generic, Instance)) != RT_SUCCESS) { 

printfOm: SetTid FaUed\n"); 
} else { 

lm_main(); 

} 

} 

#endif /* ifdef CERNEL */ 

Im mainO 
{ " 

im_tcb_t *tcb; 
struct TimerBlock *tmr_blk; 

tUINT32 *msg; 

tlNT32 delay; 

tUlNT32 tlmerid; 

tUlNT32 tlmerarg; 



tcb = Im initQ; 
if (tcb = = NULL) { 

printf(-|m: init failed"); 

return; 

} 

tmr_blk = tcb->tmr_blk; 
timerid = tcb->timend; 
timerarg = tcb*>ttmerarg; 

while (TRUE) { 
delay = 0; 
whfle (delay < = 0) { 

delay = TimerCheck(tmr_b!k, &timerid, &timerarg); 

if (delay < » 0) { 
Im srvc timer(2); 

RTCJImerSetftmrJilk, (GetTimeO + (STGRAN)), 
tlmerid, timerarg); 
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} 



} 



} 

} 

msg = (tUINT32 *) ReqMsg(LM EX MSK, delay); 
If (msg != NULL) { 

lm_srvc msg (msg); 

free (msg); 

} 



lm_srvc_timer(delay) 
UJINT32 delay; 

SETUP_TCB; 



} 



Im srvc_msg(msg) 

llTCJHEADER *msg; 



{ 



int ret; 

lnt Im crt cfgA; 

SETUP JTCB; " " 

ret » RT_SUCCESS; 

printfOrrTsrvc^msg, MsgType « %d\r\n\ msg- > MsgType); 

swftch (msg- > MsgType) { 
case TA_AALJND_RECEJVE: 

lm_srvc_aal msg (msg); 

break; 
case U_DTIND: 

Im srvc svc_msg(msg); 

break; 

case SNMPAJWGMT GET: 
lm_srvc_mgmt get(msg); 
break; 

case SNMPA_MGMT VALIDATE: 
lm_srvc_mgmt validate (msg); 
break; 

case SNMPA_MGMT COMMIT: 

Im_s(vc_mgmt_c6rnmlt(msg); 
break; 

case SNMPAJWGMT GETNEXT: 
!m_srvc_mgmt getnext(msg); 
break; 

case SNMPA CHECWN MSG: 

SendProxyfcheckin(MHW GetCardTypeO. 
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MHW_GetS!otIdQ); 

break; 
data tit: 

if ((msg->MsgType >= MSG WDB BASE) && 

(msg->MsgType <= MSG~WDB~TOP)) { 

wdb process_msg(lm_crt_cfg, msg); 
} else C 

ret = !RT_SUCCESS; 

goto err exit; 

} 

break; 

} 

return (ret); 

err_exit: 
return (ret); 

} 

Im srvc_aal jnsg (msg) 
tAAL TA IND RX *msg; 

{ 

Int ret; 

lm_alan_cfg_enq_t *aal_msg; 
tUir^T32 pvci; 
tUINT32 vci; 

aa! msg = (Im alan cfg_enq_t*) msg->Rx.Buffer, 
ret = RT^SUCCESS? 

vci = ((Im atm_hdr t *) & (msg->RxATM Hdr))->vci; 
pvci = VdT TO PVClm(vci); 

if (aai_msg~>lmS hdr.Ih pdu type != NN_PDU STATUS_ENQ 1 1 
aai msg->imrhdr.lh~protb != NNI PROTOCOL || 
pvci ! = NNI_NAC_VCl) { 
ret = !RT_SUCCESS; 
goto err exit; 

} 

switch (aal_msg«>enq.elem type) { 
case AL<VN_CFG_ENQ: 

ret = lm~sivc~alan_cfg_enq(msg); 

break* 

case LMI CONFIG_ENQ: 

ret = fm_srvc_es_cfg_enq(msg) ; 

break; 
default: 

goto err_exft; 
break; 

} 



return (ret); 
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err exit: 
return (ret); 

lm_srvc_aian cfg enq(msg) 
^ tAAL_TA_fND_RX *msg; 

Int ret; 
Im alan cfg enqt *alan enq; 
tAU\NC?G ENQ" *enqr 
tALANCFG~RESP *resp; 

tATMADDR~ paddrs[MAX PORTS PER SLOT]; 
tUINT32 in srvc; ~ ~ 1 
tUINT32 iiTsrvc mask; 
Int i; - - 

Int max port; 

lm_port_addr_t 1st; 
lm_port_t *port; 
lm_mac__t *mac; 
qlinkj *!ink; 
Im mac_yian t *mv; 
tUfiSIT32 ~tx vci; 
tUINT32 nfvci; 
tUINTS rx "shelf; 

tUINT8 rx slot; 

tUINT8 rx port; 

lm_prefix t prefix; 
lm_atm hdr t atm hdr; 
SETUPJTCB; 

ret = RT_SUCCESS; 

aian_encf= (Im_alan_cfg_enq_t *) msg- >Rx. Buffer; 
enq = &alan_enq->enq; 

in_srvc = 0; 

in~srvc_mask = 0x80000000; 

max_port = MAXPORTS PERSLOT > enq- >n urn ports ? 
enq->nurn_ports : MAXPORTS PER SLOT- 

^f^^ 0 ^^^-^ teb->my.shelf. enq->s.o«d. 0); 

tstaajannum =T O; 
tstaa port = i; 

port = FIND PORT(tcb- > port q, &tst); 
ff (port!= NOLL) { ' 
mac = port- > mac; 
If (IIS EMPTY Q(port->pv q)) { 
paddrsfi] =Ttst; 
in_srvc | = in_srvc_mask; 
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If (mac != NULL && IIS EMPTY_Q(mac-> mv_q)) { 
link - HEAD_Q(mac r > mv_q) ; 
mv = (Im_mac_vtanJ *) I ink- > data; 
tst.aa lannum » mv->mild; 
paddrsp] = tst; 
in srvc | = In srvc_mask; 

} 

} 

In srvc mask >>= 1; 



s 



atm hdr = *((!m_atm hdr t *) & msg- > RxATM_Hdr) ; 
prefix - *((Im_prefix_t *) 5 msg->RxPrefix); 

rx vci = atm Tidr.vci" ^.^ 

tx'vci = (rx vci & (~SIG_PVCI MASK)) | PVCIJ-OJ/Clm(NNI_SIGJ/CI); 

rx shelf = \TCI TO SHELFm(nTvcl); 
rx"slot = VCI TO_3LOTm(rx vd); 
rx_port = VCrTO^PORTmfbTycI); 

BUILD ATM HDR(&atm hdr, tx vci); 
BUILD'UCAST^PREFIXCBiprefDcrrx^shelf, rx_slot, rx_port); 

lm_send_alan_cfg(prefix, atm_hdr, enq->slotid. In_srvc, maxjort, paddrs); 
return (ret); 

err_exit: 
return (ret); 

} 

!m_srvc_es_cfg_enq(msg) 
tAAL_TA_l N D_RX *msg; 



{ 



int ret; 
im_es_cfg_enq_t *es_enq; 

*enq; 



tCFGELEM 
lm_mac_t 
lm_port_t 
tUINT32 
tU!NT8 
tUINTS 
tUINT8 
tUINT32 
lm_prefix_t 
Im atm hdr t 



*mac; 
*port; 
rx_vci; 
rx shelf; 
nTsiot; 
rx_port; 
tx~vci; 
prefix; 

atm_hdn 
t *mac addn 



lm_macaddr_ 
lm_port_addr_t prirt_addr; 
lm_es_cfg_resp_t Vesp; 
int respjen; 
int i; 
SETUP TCB; 
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ret = RTSUCCESS; 

es_enq = (lm_es cfg enqj *) msg->RxBuffer; 

enq = &es_enq->enq; 

mac_addr = &enq->af_my_address; 

atmhdr = *((Im_atm hdr t *) & msg->RxATM Hdr); 
P refi x = *((lm prefix F*) £ msg->RxPrefix); " 
rx vcl = atm Kdr.vcIT 

tX-V?} - & <~S1G PVCIJWASK)) | PVCI TO VCIm(NNI SIG VCI); 

rx_shelf = VCI TO SHEL?m(rx vcl); " - 1 - - ' 

rx_slot = VCI TO_3LOTm(rx vcl); 
rx_port = VCrTO_POFnrm(rx vci); 

LMJNITJ»OHTADDR(&poit addr, tcr»my node, rx shelf, rx slot. 
rx_port); ~ " " 

port = FIND_PORT(tcb->port q, &port_addr); 
mac = FIND MAC(tcr»macli, mac addr); 
if (mac = = NULL) { 

mac = add mac(mac addr); 
If (port! = NULL) { " 
atch mac_port(mac, port); 
lm_dupjDort_cfflts(port mac); 

} 

if (port ! = NULL && (port->mac != mac 1 1 mac->port != port)) { 
free_macj3ort(port->mac, port); 
atch^macjjortfmac, port); 

resp m !m_bufld es ^cfg resp(mac, enq, &resp len); 
if (resp == NULL) f ~ 

ret = !RT_SUCCESS; 

goto err exit; 

} 

BUI LD_ATM_HDR (&atm hdr, tx vci); 
BUILD^UCAST^PREFIXCiprefoc-rx^shelf, ixslat, rxjaort); 

ret = Im send_es_cfg_resp(prefix, atm hdr. resp, resp len); 
return (ret); " — 

envexit: 

^ return (ret); 

lm_srvc_svc_msg(msg) 
tAALUSRMSG *msg; 

tLMIHDR *lmi hdr; 
tSETUP *setup; 
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} 



Imi hdr = (tLMIHDR *) & msg->UPDU; 
switch (Imi hdr->lh pdu type) { 
case SDlTSETUPjflD: ~ 

Im_srvc^svc_setupjnd(msg) ; 

break* 

case SDU_SETUP_COMP: 
break* 

case SDU_RELEASEJND: 

lm_srvc_svc j'eljnd (msg) ; 

break; " 
default: 

break; 

} 



Im srvc_svc reijnd(msg) 
"struct svclf *msg; 

{ 



} 



im_srvc_svc_setup_ind (msg) 
"struct svcif *msg; 



{ 



struct svcrf *resp; 
tLMIHDR *lmi hdn 
tRELJREQ *refF 
irrt respjen; 
int ret; " 

Imjnacjt *mac; 
lm_port_t *port; 
Im_v1an_t *vian; 
lm~mac~vian_t *mv; 
lm_mlid_t mild; 
tSETUP *rx setup; 
tSETUP *toTsetup; 
lm_port_addr_t port_addn 
lm_vc_addr_t~ vc_addn 
Infvcjt " *vc; 
tUINT8 *vpci; 
SETUP_TCB; 

ret = RTSUCCESS; 

resp len ■» SVCIF_PDU_OFFSET + sizeof(*tx_setup) + 

sfzeof (struct !mT_parm); 
resp = (struct svcif *) ReqMsgMemZero(resp len); 
if (resp = = NULL) { 

ret = !RT_SUCCESS; 

goto err exit; 
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} 

rx_setup = (tSETUP *) & msg->lmi hdr; 

txjsetup = (tSETUP *) & resp->lmfhdn 

*tx_setup = *rx setup; 

ImQidr « (tLMIflDR *} & tx_setup->lml hdr 

lmijidr->lh_pdujype = SDU_SETUP RESP; 

port_addr = rx_setup->Imi caller; 

mlid = port_addr.aaJannum; 

port_addr.aa lannum » 0; 

port = FIND "PORT(tcb-> port q, &port addr); 

ff (port = = tfULL) { ~ 

ret = IRT_SUCCESS; 

goto err_exit; 

mac = port- > mac; 
if (mac == NULL) { 

ret = IRT SUCCESS; 

goto err exit; 

} 

mv = FIND_MUD(mac->mv q, mlid); 
if (mv - = NULL) { 

ret = !RT_SUCCESS; 

goto err exit; 

} 

vlan = mv->vfan; 
if (vlan = = NULL) { 

ret = IRT SUCCESS; 

goto err_exit; 

i?- 1 cLH^PP R(&vc -- addr ' v,an " >v, an tt &nc setup->lml callee); 
vc = FIND_VC(vIan->vc q, &vc addr); 7 
if (vc = = NULL) { 

vc = add_vc(&vc_addr); 

if (vc == NULL) { 
ret = !RT_SUCCESS; 
goto err exit; 

} 

vc->ref cnt+ + ; 

ypci = QUINTS *) tx setup + sizeof(*tx setup); 
LMI_ADD_ELEMENl7vpcf f LMIJDVPCI, vc->bld); 

lmijidr->ihcref_type | = LM CREFDIRECTION MASK; 
ret = I m_send_svc_msg (resp, lespjen) ; 

return (ret); - 



err exit: 

If (resp! = NULL){ 
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Imi hdr->lh cref type | = LMI_CREFDIRECTION_MASK; 
Imjsend svcj-efreqCmiJidr, INVAUD_STATE); 
free(respj; 

} 

return (ret); 
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/* Im.h 



* 



* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 
V 



#lfndef LM H 
#define LAT.H 

#define LM VB QUIET (0) 
#define LM"VB^ERRS (1) 
#define LM~VB_TERSE (2) 
#define LM~VB VERBOSE (3) 
#define LM_VB~MSGS (4) 
#define LM_VB_ALL (999) 

#define CHK_VB(Ievel) (tcb-> verbose > = level) 

#define LM MAX VLAN NAME (17) 
#deflne LM INDENT " (2) 
#define LM~DFLT_MTU SIZE (9100) 
#define LMJDPLT NUM~MCASTS (4) 
#define LM_MAX "MUD " (256) 
#define LM MAX~BID (1024) 
#define LM~MAX MID (1024) 
^define MAX SL0TS (16) 
#define MAX~PORTS_PER SLOT (8) 

#define MAX_PORTS {MAX SLOTS * MAX PORTS PER SLOT) 
#define LM AAL EX (EX INDICATION) " " - ' 
#deflne LM AAL~EX MSK~ (M EX INDICATION) 
#define LM~STAfiT VC\ (0x3000)" 
#define LM~END_VCl (0x3fff) 
#define LM INSTANCE (0) 

#define LM~AAL SID (MAKE SSID(TID LM, LM INSTANCE, LM AAL EX)) 
#define LM EX MSK (M EX" INDICATION) " - - jJ 

#define SIZE MlD_BITS 7L&TMAX MID / (8 * SIZE BITS)) 
#deflne SIZEJUUD BITS (LM"MA)rMUD / (8 * SIZE BITS)) 

fie 6 iP<ff&£&g2^ ' <8 * S,2E - BTrS,) 

<!^dr)->aajong[or= (paddr)->aaJong[i] = o, (paddr)->aa type = AAT PORTA 
(paddr)->aa_country = USA) - - ,x 

#define LM CLR VC_ADDR(vcaddr) \ 

((vcaddrF>vtan_ld = 0, LM CLR MAC ADDR(&((vcaddr)->mac addrtM 
#define LM_INIT_PORT ADDRlpaddr. node, shelf, slot port) \ -™ W ' 

(LM_CLR_PORT_ADDR(paddr).\ ' x 

(paddr)->aa_node = node, (paddr)->aa_shelf = shelf. (paddr)->aa_slot = slot\ 
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(paddr)->aa_port ■ port, (paddr)->aajannum = 0) 
#defme LM INIT_MAC ADDR(maddr, macaddr)\ 
((maddr)~>aa longfo] = (mac_addr)- > aa Jong [0] , \ 
(maddr)->aaJong[1] = (mac addr)->aaJong[1], \ 
(maddr) - > aa_ty pe = AAT_MAC) 
#define LM INIT VC ADDR(vcaddr, vid, maddr)\ 

(LM CLR VC~ADGR(vcaddr), (vcaddr)->vian id = (vkJ)A 
LM INIT MAC ADDR(&((vcaddr)->mac_addr), maddr)) 
#define LMlMUM~ELEM(ary) (sizeof(ary) / sizeof((ary)[0])) 
#define BUILDjfCH(Hdr, len, generic, Instance, exch, mtype, mytld) \ 

{Hdr.Length=len; \ 
Hdr.DestLabel.Pid =0; \ 
Hdr.DestLabel.Sid - \ 

MAKE SSID(generic,instance,exch);\ 

Hdr.Dest.Ner= LOCAL NET; \ 
Hdr.Dest.Node = LOCAL NODE; \ 
GetPid(&Hdr.Orig.Label.Plb); A 
Hdr.Orig.LabeI.SId - \ 
MAKE_SSID(mytid.Generic, 0, EXJNDICATION);\ 

Hdr.MsgType « mtype;} 



typedef tUINT32 Im mlidj; 
typedef tUiNT32 inTbid t; 
typedef tUlNI16 Imj/ianJdJ; 

typedef struct lm_prefix_s { 

unsigned pri:2;~ 

unsigned tag_a:6; 

unsigned fii!1:2; 

unsigned rp:1 ; 

unsigned nrc:l; 

unsigned cos:4; 

unsigned fiH2:i; 

unsigned br:1 ; 

unsigned vem:1; 

unsigned mb:1; 

unsigned tag_b:4; 

unsigned fiJI3T2; 

unsigned tag_c:6; 
} Im prefix t; 

#define S1ZE_LM_PREF1X (sizeofflmj>refix_t)) 

#defme CLR_PREFlX(pfx) (*((tUINT32*)(pfx)) = 0) 

-#define BUILD JJCAST PRERX{pfx, shelf, slot port)\ 

(CLR_PREFIX(pfx), (pfr)->tag a - shelf, (pfx)->tagj> = slot \ 
(pfx)->tag_c = port, (pfx)->rp = 1) 
/* Fix RPA10Mar92 •/ 
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#define BUILDJ/1CAST PREFIX(pfe, bid)\ 

(CLR^PREFlX(pfcc) f (pfcc)->br = 1. (pfr)->tag a = (((bid) & OxfcOO) >> 10),\ 
(pfx)->tag_b = (((bid) & Ox03cO) >> 6), (pfe^>tag_c = ((bid) & 0x003f)) 

typedef struct Im atm hdr s { 

unsigned ~gfc:4; 

unsigned vpl:8; 

unsigned vcl:16; 

unsigned pt:2; 

unsigned rsvd:1; 

unsigned clpn ; 
} lm_atm_hdr t; 

#define S\ZEJUMJJhAj\DR (sizeofOmjatmJidM)) 

#define CLR_ATM_HDR(hdr) (*((tUINT32*)(hdr)) = 0) 
#define BUILD ATM HDR(hdr, the vcl)\ 
(CLR_ATM_RDR(fidr) ( (hdr)->vcT - the_vcl) 

typedef struct im aian cfg enqs { 

struct I ml hdr~lmi hdr;~ 

tALANCFS_ENQ "enq; 
} lm_alan cfg_enqt; 

#define Si2E_LM_A£>N_CFG^ENQ (slzeofflmjilan_cfg_enqj)) 

typedef struct lrn_alan cfg resp s { 

struct I mi hdr Imi hdrT 

tALANCFg ENQ ~enq; 

tALANCFG~RESP resp; 
} lm_alan_cfg_resp_t; 

#define SIZE_LM_ALAN_CFG_RESP (sizeofflmjilanjrfg_respj)) 

typedef struct lm_es_cfg_resp s { 

struct Imijidr Imi hdr; 

tCFGELEM enq; 

tCFGELEM resp; 

tPORT_CFGELEM paddr[1 J; 
} Im es cfg resp_t; 

#define SIZE_Q/TES_CFG_RESP (sizeofOmj*_cfg_respj)) 

typedef struct lm_es cfg enq s { 

struct lmi_hdr lmT_hdr; 

struct config_elem enq; 
} lm~es_cfg enq_t; 

#define SIZEJ3a_ES_CFG_ENQ (sizeof0mj^_cfg_enq_t)) 

typedef struct atm_addr immac addr t; 

#define SIZE_LM_MAC_ADDR lsizeofflm_macaddrJ)) 

typedef struct atm addr Im port addr f 

#define SIZE_LMJPORT_ADDR " (sizeofflm jjortjjddrj)) 
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typedef struct lm_vc_addr_s { 

lm_vtan_id_t ""vtanjd;"" 

struct atm addr mac addr, 
} im_vc_addr~t; 
#define SIZEJJrf_VCADDR (sizeofOmj/c_addrJ)) 

#define aa country aa_u.aaw.aasw nibble2 
#define aa~shelf aa u.aaw.aasw_nib6le3 
#define aa_slot aa~uaaw.aasw~nibble4 
#define aa_port aa_u.aaw.aaswjnibble5 

typedef struct Im tcb_s { 

tTID mytld; 

tPID mypid; 
struct TimerBIock *tmr_blk; 
tUINT32 timerid;" 
tUINT32 timerarg; 
tATMADDR nac_atm addr; 
tUINT32 nac id; 
tAAL_KEY m£_aal_key; 
tUINT32 my_node; 
tUINT32 my_shelf; 
tUINT32 my_slot; 
lmjDort_addr_t port tmplt; 
tUINT32 cur_b&; 

bits t bid bits[SIZE BID_BITS]; 

bitsj mlid bits[SIZffMUD_BITS]; 
tUINT32 dflt mtu_size; 
IUINT32 dflt~num mcasts; 
tUINT32 verbose" 
UJINT32 do_cfg_wrts; 

char vc_addr buf[200]; 

char mac_addr_buf[slzeof(lm_mac_addrj) * 3 + 1]; 

char port_addr_buf[40]; 

char vtan Jd_buf [1 OJ ; 

queue_t port_queue; 

queuejt vtarTqueue; 

queue_t mac_queue; 

queue_t mv_queue; 

queue_t pvjqueue; 

queue_t vc_queue; 

queue_t *port_q; 

queue~t *vtarTq; 

queue_t *mac~q; 

queue_t *mv_q; 

queue_t *pv_q; 

queue~t *vc~q; 

} " Im tcb t; 

#define SIZE LM TCB (sizeofflm tcb t)) 
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typedef struct lm mac s { 

qlinkj mac Jink; 

queuejt mv~queue; 

queuej *mv~q; 

struct lm_port_s *port; 

Inwnac addr~t mac addr; 

blts_t ~ mlid_blts[S!ZE MUD BITS]; 
} Imjnac t; " ~~ 

#define SIZELMjAc (sizeofflm_macJ)) 

typedef struct lm vfan s { 
qlinkj vTanjIhk; 
queue_t pv~queue; 
rqueuej *pv[.q; 
queue_t mv queue; 
queuej *mv~ q; 
queue~t vc_queue; 
queue_t *vc_q; 
queue_t free_vc queue; 
queue J *free vcTq; 
lm_vfanjd t vtari" idf 
tUINT32 ~ mtujsize; 
IUINT32 num m casts; 
lm_m!id_t dflt_mlid; 

char vfan ~name[LM MAX VLAN NAME]* 

bits_t mid "Bits[SIZE KlID glTSJ; 
> lm_vfan_t; ~ 

#define SIZEJJUVLAN (sizeofflmj/lanj)) 

typedef struct lm port_s { 

qilnkj pbrt link; 

Im_port_addrj port addr; 

Immact *mac;~~ 

queue_t pv queue; 

queue~t *p\T q; 

bitsj* mlid "bits [SIZE MUO BITS]; 
/ lm port~t; 

#define SIZE_Cm_pOrt (slzeof(Im_portj)) 

typedef struct lm_vc s { 

qlink t vcjlhk; 

qlink t vlan link; 

lm_ylan_t *vlah; 

lm~vc_addr_t vc addr; 

lm bid t bid;" 

tUINT32 ref cnt; 
} lm vc tf 

#define SIZE_Q/TVC (sizeof(lm_vc_t)) 
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typedef struct Inrvport viands { 

qllnk_t pvJInE; 

qllnkj portjlnk; 

qlink t vtarTlink; 

lm_vlan_t *vian; 

lnrTport_t *pcrt 

lm_mlid~t mild; 

lm_vtanjd_t vlanjd; 

lm_port_addr__t port_addr; 
} Im port vlan t; 

#defme SIZE^CM^PORTjyLAN (sizeofflmj>art_vfen_t)) 

typedef struct lm_mac_vtan_s { 

qlink_t mvjirik; 

qllnk_t mac link; 

qlinkjt vlanjink; 

lm_mac_t *mac; 

Im~v1anjt *vlan; 

Im_v1anjd_t vlanjd; 

Im mac addr t mac addn 

tUINTl6~ ~mld; 

!mjnlld_t mffd; 
} Im macjdan t; 

#define S!2E_LM_MAC_VLAN (sizeofflmjnacj/lanj)) 

typedef struct lm_cfg_glbl_s { 

tUINT32 dflt mtu_size; 

tt)INT32 dflt~num_mcasts; 
} Im_cfg glbl tT 

#define S IZE_LM_CFG_GLB L (sizeofflm_cfg_glbl_t)) 

typedef struct Im cfg vlan s { 
tUINT32 ~dflt"mlidr 
tUINT32 num_mcasts; 
tUINT32 mtu size; 

char vian_name[LM_MAX_VLAN_NAME]; 
} Im cfg vtan t; 

#define SlZEJJrfJ^FGjtfLAN (sizeofflm_cfg_v1an_t)) 

typedef struct Im cfg_port s { 

tU!NT32 "eljontof 
} Im cfg port t; 

#define SIZEJJrfCFG^PORT (sizeofflm_cfg_portj)) 

typedef struct Im cfgjnac s { 

tU I NT32 % ~el Jonta;" 
} lm_cfg~mac_t; 

#define SIZEJJW_£FG_MAC (sizeofOmjrfgjTiacj)) 
typedef struct lm_cfg_pv_s { 
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tUINT32 mild; 
} lm cfg pv t; 

#define SIZEJOMJCfcTpv 

typedef struct lm cf g mv s f 

tUINT32 -mllJ; " 
} lm cfg mv t; 

#define SlZEjDAjSfGlMV 

typedef struct lm cfg vc s { 

tUINT32 "eljonto; 
} lm cfg vc t; 

#defineSI2E LM CRT VC 



(slzeofflmjrfgjwj)) 



(sizeofflmjrfgjTivj)) 



(si2eof(Im_cfg_vcJ)) 



typedef struct lm gib! cfg key s { 

tUINT32 "tagf 
} lm glbl cfg key t; 

#define SIZEJOMJSLbCCFG KEY 

typedef struct lm vlan cfg key s { 

tUiNT32 "tag;" 

lm_vianjdj vlan kJ; 
} " lm_vlan_cTg key t; 

#define SIZE LM VLAN"CF<3" KEY 



(skeof0m_glbl_cfgj<eyj)) 



(sizeofflmj/fan_cfgJcey_t)) 



typedef struct lm port cfg key s { 

tUINT32 tag;" 

lm_port_addr_t port_addn 
} lm_port cfgjcey t; 

#define SIZEJJV!_pORTJ;f<3j<EY (sizeof(lmj5ortjrfgjceyj)) 

typedef struct lm mac cfg key s f 

tUIMT32 lag;" " 

lm_mac_addr t mac addr; 
} lm mac cfg key t; 

#define SIZE_LM_MACCFGJ<EY (skeof0mjnac_cfg_key_t)) 

typedef struct lm vc cfg key s i 

tUINT32 "tag; 

lm_vc_addr_t vc addr; 
} lm"vc cfg key t; 

#define SIZEJ^J/C_CFGJ<EY (skeof0mj/c_cfg_key_t)) 

typedef struct lm pv cfg key s 1 

IUINT32 tag; ; 

lm_port_addr t port addr; 

lm_vianjd_t " vlan 0; ' 
} lm pv_cfg"key t; 

#define SIZE_Ltoj>VCFG_KEY (sizeofflmjwjrfgjceyj)) 
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typedef struct Imjnv cfg key s { 

tUINT32 tag" 

lm_mac_addr t mac addr; 

lm_vtanjd t "vtan IdT 
} Im mv cfg key t; 

#define SIZEJJvlJjiV_CFGJ<EY (sizeofflmjnv_cfg_keyJ ( 

typedef union cfg_key_u { 

MJINT32 tag; 

lm_glbl_cfg_key_t glbl_key; 

Im vlan_cfg keyj vlanjcey; 

I rrf port_cf g^keyj port_key; 

lm"~mac_cfg keyj mac_key; 

Imj/c cfg_key_t~vc key. 

Im pv^cfgkeyj pv~key; 

Irrf mv cfg key t mv_key; 
} ~ ~ lm_cfg" key~t; 

#define SIZEJJtf_£FG J<EY (sizeof(lrncfg_key_t)) 

#define NULL_CFG KEY (0) 
#define GLBL_CFG~KEY (1) 
#define VLAN_CFG_KEY (2) 
#defme PORT CFGJCEY (3) 
#define MAC ^FG_KEY (4) 
#define VC CFG KEY (5) 
#define PV~CFG~KEY (6) 
#define MV_CFG_KEY (7) 

#ifdef UNIX 

extern tlNT8 *G!obalP; 
#undef printf 
#endrf 



#define malloc(size) GetMem(size) 
#define free(ptr) FreeMem(ptr) 

#define FREE Q(q, proc) ((int)traverse_q(q. proc, NULL)) 
#define FREE'MV Q(q) FREE_Q(q. freejnv) 
#define FREE_PVl3(q) FREE_Q(q, free_pv) 
#define FREE MAC Q(q) FREE Q(q. freejnac) 
#define FREE~VLAfsT Q(q) FREE~Q(q, freeman) 
#define FREE~PORf~ Q(q) FREETQ(q. free_port) 
#defme FREE~VC QTq) FREE_0(q, freeze) 
#define FREE'PORT VLAN Q(q) FREE_Q(q. freej3ort_vtan) 
#define FREE~MAC_VLAN "Q(q) FREE Q(q. freejnacj/lan) 
#deflne FREE MAC MVdfa) FREE Q(q, freejnacmv) 
#define FREE~"VLAlT MY Q(q) FREE Q(q, freejdanjnv) 
#define FREE~PORt" PV~Q (q) FREE_Q(q, free_portw) 
#define FR E E~VLAN ~P V Q(q) FREE_Q(q, free_vlan_pv) 
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£Xk^T^r9* (q ' mac) Wntjtravefse q(q, atch mac mv, mac)) 
235 8 A^-^-^-° (q ' ^ (('^traverse q(q. atch vlan mv, vlan)) 
#define ATCH_PORT_PV_Q q, port) ((int)traverse q(q, atch-porTpv, port) 
#define ATCH_VLAN_PV_Q(q, vlan) ((IntJtraversejJS atchjSanJIJ San)) 

#define ATCH MV MAC Q (q, mv) ((lnt)traverse q(q, atch mv mac mv)) 

23fr ne a^-^^P" 1 - 0 ^' «'nt)traverse q(q, atch pv port, pv)) 
#define ATCH_PV_VUN_Q(q, pv) ((Intjtraverse^q! atchj^vSn. pv)) 

#deflne FIND MAC(q, mac) ((Im_mac t*)traverse q(q, cmp mac. mac)) 
23 e ? ne S^-, P P RT(q ' port) Wrn-Port T«)traverse q(a cmp po5 port)) 
#define F ND VLAN(q, vlan) ((Im-vlanl^traverse q(q, cmp vlan vlan)) 
#define FIND_VC(q, vc) (0m vc ^traverse q(q?cmp vc vc) ) " 
23?; ne S» "*» ((lm_mac_vlan t*jfi£» qfa'cmp mv, mv)) 
23^" e SKE-EYfe,* 4 (flmjportvian ^traverse q(q%mpjpT^) 
#define FIND_MUD(q, mlid) ((lm_rmc_v1an_t*)traversi_q(q, cmplmlS/mlld)) 

#define RNDNE)a_MAC(q, mac) {0m mac t*)traverse q(q, cmpnext mac mac)) 
23 e ?" e SmR^- P0RT ^' P° rt > « lm Port t*)traverse qfo * cmSe* TpS? port) 
23 e r" e SmS^IE^ 4 ^ ((lm-vlan-t*)traverse-q(q cmS"^ 5an)) 
*£* FKiS-MS?' V °\ W m - V ^)traven5e_q(q, cSp^ext ^c)) ' ^ 
#aefine ™NDNE)CT MV(q. mv) (0m mac vlan t*)traverse q(q, crriDnext mv mv)) 

23 6 ? ne 2Si£- PV(q ' M « ,m P° rt * an ^traverse q(q cmpSa^pv^ ovT" 
#def,ne FINDNEXT_MUD(q, mlid) 7(lmjhac>nj*)tra^^ mild)) 

23f«"f pHJS-f 25Ii5-^ C(Iink - sorted0ink. q. qpsc mac)) 

23!lin 6 n, L ^S-f2 R J^°-. P0RT(link ' 9) (PUtq>rted0ink. q. qpsc-poS 
£Sf =, L ^rS-iS2J^ D - VLAN < ,ink - q > (P"tqsorted0ink. q qp^Sari) 
23 e « ne L^-^ RTED - VC C ink - * (PUtq sorted0lnk, q qpS vc)) 
23f?" e £HI2-f O R TED_PV0ink. q) £utq%orted0ink. q JpS> 
#def ine PUTQ_SORTED_MV(link, q) (putq>rted0ink. q, qpscjrlv)) 

23 e I' ne ES^iX-P^' proc - indent ) (Ontjtraverse q(q, proc. Indent)) 
2Snf p2 S-M^ N 7?/ q ' indent) PR, NT_Q(q. pHnt vlan. indent 
235 e ^ ^-^ C - Q(q > indent > PR'NT Q(q, print-mac indent) 

t^l SSS-^'Sr 0 ^ ,ndent > PRINT "Q(a Prinfport. indert 
#def ne PRlr^TPV_Qfa indent) PRINT Q(q, print pv indent) 

#define PRINT_VC_Q(q. indent) PRINT_Q(q. prinrvc, indent) 

#dehne pGlobalData (0m_tcb_t*)GlobalP) 

#define DEFINE_TCB lm tcb t *tcb 

#define SETUP TCB DEFINE"_TCB = pGlobalData 

extern struct AgentMsg *lm cp_mgmt msgO; 
extern lm_es_cfg_resp t *lm build es~cfg respft- 
extern lm_mac_t «add~mac(J; ~ ~ 
extern lm_port_t *add"portO; 
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extern Im 
extern Im" 
extern Im] 
extern Im] 
extern Im] 
extern Im] 
extern Im] 
extern Im] 
extern Im' 
extern Im" 
extern Im* 
extern Im] 
extern Im' 
extern Im] 
extern Im] 
extern Im] 
extern Im] 
extern Im] 
extern Im] 
extern Im" 
extern int" 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern Int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern Int 
extern int 
extern int 
extern int 
extern int 
extern int 
extern int 



_vlan_t *add_vlanO; 
ycj. *add vcO; 

ycj. *get3*ee_vc(): 
[vc_t *add_free vcQ; 
"mac vtanj *a3d_mv(); 
"portj/lan_t *add_pv(); 
~mac_t *cmp_macO; 
"port_t *cmp~portQ; 
vian_t *cmpjdan(); 
~vc_t *cmp_vcO: 
~port_vian_f *cmp_pv() ; 
'jmacjAanJ *cmp_mv(); 
[mac_vian_t *cmp~mlid(); 
'mac J *cmpnext_macO; 
]port~t *cmpnext"portO; 
vlarft *cmpnext]]vian(); 
ve t *cmpnext_vcO; 
]port_vtan_t *cmpnext_pv(); 
]macTyian_t *cmpnext_mvQ; 
"mac]]]vlan"t *cmpnext_mlidO; 

qpsc_macO; 

qpsc^portO; 

qpscfvlanO; 

qpsc~vcO; 

qpsc_pvO; 

qpscjnvQ; 

atch]]macjTiv(); 

atch_vianjnvO; 

atch_port_pvQ; 

atch~vlan]]]pvO; 

atch_pv_vianO; 

atch_pv_portO; 

atch_mv_mac(); 

atch_rnv_v1an(); 

free_macO; 

free_yian(); 

free_portO; 

free_vcO; 

free^portjdanO: 

free]jnac_v!anO; 

free_mac_mvO" 
freej/lan mvO; 

free_porTpvO; 
freej/tan pvO; 
free_mv(J7 
free pvO; 
print_macO; 
print]]]vlanO; 
print""portO; 
print]]vcO; 
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extern int print mv(); 

extern Int prinfpvQ; 

extern char *sprfnt mac addrQ; 

extern char *sprinrport~addr(); 

extern char *sprinrvfarTidO; 

extern char * sprint j/c_addr(); 

extern struct TimerBIock *Timer1nitO; 
#endrf /* ffndef LM_H */ 
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/* lm_cfg.c 

* — 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

V 



#ifdef CERNEL 

#include u ipc_def.h' 
#include ■netjJef.h" 
#include < global def.h> 
#lnclude <drtvervR> 



#undef Imjnit 

#else /* ifndef CERNEL */ 

#include <stdinth> 
#include <globaI_def.h> 
#include <ITCjf.h> 
#include <drtver.h> 
#include <RT_if.h> 
#lnclude <tlmer.h> 
#include <RT_def.h> 
#include <enet_if.h> 
#include <net_def.h> 

#define ERRLOG prlntdbg 
#defme printf prlntdbg 

#end*rf /* ffdef CERNEL */ 

#include "unipdu-h" 
#include "nnipdus.h" 
#lnclude tt aJtask_gl.h" 
#inciude "slgtask_gl.h" 
#indude u svctask_g|.h" 
#indude •svcjf.h r 
#inciude "snmp Ind.h" 
#lnclude "AALjEh" 
#inciude "wdb tf.h* 
#lndude ■q.h"" 
#include "bits-h" 
#include "IrrLh" 

#define WDB VERS (1) 
#defme WDB~PRI (1) 
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^02- 

^uW- d9( ?^^^^ nac - addr - bw - bfts - »*U** 

tUINT32 *dflt~nunf m casts; 
tATMADDR *nac addr; 
bftsj *bid bftsf 
bitsj *mJld bits; 



{ 



} 



SETUP JTCB; 

If (dflt_mtu_size I = NULL) { 

tcb->dflt_mtu_size = *dflt_mtusize; 

If (dflt_num_mcasts J = NULL) { 

j tct?>dflt num_mcasts = *dfit_num_mcasts; 

ff (nac_addr ! « NULL) { 

tcb r >nac_atiTi_addr = *nac_addr; 

If (bid_bits f = NULL) { 

bcopy(bid_bits f tcb->bid_btts. sl2eof(tcb->bid_bits)); 

if (mlid_brts I = NULL) { 

bcopy(mlid_bits, tcb->mlid^blts l si2eof(tcb->mlfd_bfts)); 

lm_wrt_glb!_cfg(); 



{ 



v^^^. dtt - , ^ , num - mcasts ' midsize, vtanmine) 
tUfNT32" *dfltjmlid; 
tUINT32 *num mcasts; 
tUINT32 *mtu "size; 
tUINT32 ^/tarTname; 

qlinkj *!ink; 
lm_mac_t *rriac; 
Imjnac vlan t *mv; 
SETUPjTCBf 

If (dflt miid ! = NULL) { 

If (^dfltjnlid > = LM_MAX_MUD 1 1 

Iblts tst bft(*dflt^m]id, tcb->mlid bits, SIZE MUD BITS)) f 
if (vian->dflt mlid < LM MAX MOD) { ~ ~ " 1 
brtsjreejblt(vlan->dflt mild, tcb->m!ld bits. 

SIZE_MUD_BlfS); " . 

If (*dflt_mlid < LM MAX MUD) { 

bitsjai!ocjDit(^ffit_mfi"d f tcb->mlid bits 
SIZE_MUD_BITS); " ' 
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vlan->dflt mlid = *dflt mlid; 

} 

} 

if (num_mcasts ! = NULL) { 

chg num vcs(vian, *num mcasts); 

> 

if (vlan_name ! = NULL) { 
Int namejen; 

namejen = strlen(vlan_name); 

namejen = (name ten < LM_MAX VLAN NAME) ? namejen : 

LM MAXJ/LAN TlAME - 1; 
bcopyfvlanjiame, vian->vlan_name, namejen); 
vtan->vlan name [name len] = 0; 

} 

if (mtu_size ! = NULL) { 

vlar>>mtu size = *mtu size; 

} " 
lm_wrt vian_cfg(vian); 

for (link = HEAD_Q(vlan->mv q); link != NULL; 
link = link- > next) { 
mv = (lm_mac_vianj *) link- > data; 
mac = mv- > mac; 
if (mac ! = NULL) { 

lm_send es cfgjnd(mac); 

} 

} 

} 

lm_chg_port_cfg(port, mac_addr, mlid^bits) 
lm_portj *port; 
lm_mac_addrj *mac_addr; 
bitsj *mJid bitsf 

{ 

lm_macj *mac; 
SETUPJTCB; 

if (mac_addr I = NULL) { 
if (port->mac != NULL) { 
mac = port- > mac; 
free mac(mac); 

} 

mac = add_mac(mac_addr); 

atch_mac_port(mac, port); 

lm dup port dflts(port, mac); 
} - " "... 
if (mlid bits ! = NULL) { 

bcopy(mlid bits. port->mlid bits, sizeof(port->mlid bits)); 

} 

lm_wrt_port_cfg(port); 
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} 



lm_chg_mac_cfg(mac. mild bits) 
lm_mac t *mac; ~ 
bftsj ~ *mlid_bits; 

SETUP_TCB; 

if (mlid_bits I = NULL) { 

bcopy(mlld_bits, mac->mlld_bits. sizeof(mlld_bits)); 

lm_wrt_mac_cfg(mac) ; 

lm_chg_vc_cfg(vc, bid. ref cnt) 
lm vc t *vc; ~ 
lm~bid]_t *bld; 
tUlNT32 Went; 

SETUP_TCB; 

if (bid ! = NULL) f 

if (Ibtts tst_bit(*bid. tcb->bid bits. SIZE BID BITS)) { 
brts_free_brt(yc->bid. tcb->bid bits. SlZE'SID BITS) 
J?4id C = n, ( |d bid ' tCb - >b,d - b5 " s ' SIZE_BiD_BiTS); 

> 

if (ref cnt I = NULL) { 
vc->ref_cnt = *ref_cnt; 

•lm_wrt_vc_cfg(vc); 



} 



lm_chg_ pv _cfg( pVi m | id ) 
lm_port vlan t *pv: 
tUINT32 -*mlid; 

Im port t *port- 
SETUP TCB; 



port = pv->port; 

if (mlW l= NULL && port != NULL) { 

if (Ibrts L tst_bft(*mlid. port->mlid bits. SIZE MUD BITS)) { 
bfts _free_blt(py->mlid, port->mlid bits, SIZE MUD BITS) - 
t % ->t^^' P*"*U* SIZE_MDD_BJtS); 
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lm wrt pv cfg(pv); 



lm_chg_mv_cfg(mv, mlid) 
Im mac "vlan t *mv; 
tUlNT32" ""-'mlid; 

{ 

Imjnac t *mac; 
SETUPjTCB; 

mac = mv->mac; 

tf (mlid ! = NULL && mac 1 = NULL) { 

ff Obits tst bft(*mlid, mac->mlid_bits f SIZE MUD BITS)) { 
bltslree bit(mv->mlid f mac- > mlid bitsrsiZE MJD BITS); 
bits>lloc_bit(*mlid f mac->m]id_bits, SIZEMdD_BlTS); 
mv->mlid = *mlid; 

} 

} 

Im wrt mv cfg(mv); 
if (mac ! = FlULL) { 

Im send es cfg Ind(mac); 
} " " ~ ~ 

} 

Im rm glbl cfgO 

im_g!bl_cfgj<ey_t key; 
Im_cfg3'bl t cfg; 
SETUPJTCB; 

key.tag = GLB L_CFG_KEY; 

wdb send remove noack(&key, sizeof(key)); 



Im_rm_v1an_cfg(vian) 
lm vlan t *vlan; 

{ ~ ~ 

lm_v!an_cfgj<ey_t key; 

Im cfg vlan t cfg; 

SETUPTCS; 

key.tag - VUVN_CFG_KEY; 
key.vlanjd ■ vlan->vtanjd; 

wdb send remove noack(&key, sizeof(key)); 



lm_rmj3ort_cfg(port) 
lm_port_t *port; 
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{ 

lm_port_cfg key t key; 
Imjrfg port"t cfg; 
SETUPJTCB; 

key.tag = PORT CFG KEY; 
key.port_addr »"port->port_addr; 

wdb_send^remove^noack(&key f sizeof(key)); 

lm_rm_mac_cfg(mac) 
^ InwnacJ *mac; 

Im_mac cfg key t key; 
Jm cfg mac^t cfg; 

serupjrcBT 

key.tag = MAC_CFG KEY; 
key.mac_addr = mac~>mac_addr; 



} 



wdbj5end_remove_noack(&key, sizeof(key)); 

im_rm_vc_cfg(vc) 

Im vc T *vc- 
{ ~ - 

lm_vc_cfg key t key; 

lm_cfg vc"t "cfq: 

SETUP~TCB; 

key.tag = VC CFGJCEY; 
key.vc_addr = vc->vc_a'ddr; 

wdbj5endj-emove_noack(&key, sizeof(key)); 

lm_rm_pv_cfg (pv) 
lmJport_v!an_t *pv; 

lm_pv_cfg key t key; 
Im cfg pv"t "cfg; 
SETUPJTCB; 

key.tag = PV CFGJCEY; 
key.port_addr= pv->port addr 
key.vfanjd = pv->vlan Id" 



} 



wdb^sendjemove^noack(&key, slzeoi (key)); 
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I m_rm_m v_cf g (rnv) 
Im mac vian t *mv; 

{ " " " 

!m_mv_cfgj<ey_t key; 

lm_cfg mv~t "cfg; 

SETUPJTCB; 

key.tag = MVCFG_KEY; 
key.mac_addr = mv->mac addn 
key.vlanjd = mv->vlanjdf 

wdb_sendjemove noack(&key, sizeof(key)); 



lm_wrt_gibl_cfgO 

lm_glb!_cfg key t key; 
Irn cfg glbTt c!g; 
SETUPJTCB; 

if (tcb->do cfg_wrts) { 

key.tag = GLBL_CFG_KEY; 

cfg.dflt_mtu_size = tci»dfltjntu_slze; 
cfg.dflt_numjn casts = tct»dflt_nunn_mcasts; 
wdb_send_stbre_noack(&key, sizeof(key), &cfg, sizeof(cfg), 
WDB VERS. WDB PRI); 

} 

} 

lmj/vrt_vian_cfg(vlan) 
Im vlan t *vlan; 

lm_vlan_cfg_keyj key; 
lm_cfg vlan t cfg; 
SETUPJTCB; 

if (tcb->do_cfg wits) { 

key.tag = VDVN_CFG KEY; 
key.vlanjd = vfan->vfanjd; 

cfg.dflt_mlid - vtan->dfit_m!ld; 
cfg.num_mcasts = vlan- > num_mcasts; 
cfg.mtu_size = vlan->mtu_size; 
bcopy(v1an->v1anname, cfg.vian_name, sizeof(cfg.vian_name)) 
wdb_send_store noack(&key, sizeof(key), &cfg, sl2eof(cfg), 
WDB tfERS, WDB PRI); 

} 

} 
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lm_wrt_port_cfg(port) 
im_port_t *port; 

lm_port_cfg keytkey; 
lrn_cfg port~t cfq: 
SETUPJTCB; 

ff (tcb->do cfg wrts) { 

key.tag = PQrt CFGJCEY; 
key.port_addr = "port- > port addr; 



cfg.el tonto = 0; 



} 



} 



lmj/vrt_mac_cfg(mac) 
^ lm_mac_F *mac; 

lm_mac_cfg_keyj key; 
lm_cfg mac t "cfg* 
SETUP~TC8T 

if (tcfc»do_cfg wrts) { 

key.tag * MAC CFG KEY; 
key.mac_addr = mac>>mac_addr; 

cfg.el tonto - 0; 



{ 



lm_wrt_vc cfg(vc) 
lm_vc_f *vc; 

lm_vc_cfg_key t key; 
lm_cfg vc t "cfa: 
SETUPJTCB; 

ff (tcb->do cfg wrts) { 
key.tag = VC CFG KEY; 
key.vc_addr = vc->vc_addn 

cfg.el_tonto = 0; 



WO 94/07316 



sir 
Im cfg.c 

-109- 

} 

lm_wrt_pv_cfg(pv) 
Im port vtan t *pv; 

{ " " " 

!m_pv_cfg_key t key; 
lm_cfg" pv""t ~cfg; 
SETUPJTCjB; 

If (tcb->do cfg wrts) { 
key.tag = PV_CFG KEY; 
key.port_addr = p\£>port_addr; 
key.vlanjd = pv->vianjd; 

cfg.mlid = pv->mlid; 

wdb_send store noack(&key, sizeof(key). &cfg, sizeof(cfg), 
WDB VERS, WDB PRI); 

} 

} 



I m_wrt_m v_cf g (mv) 
im_mac~vianj *mv; 



{ 



} 



lm_mv_cfg_keyj key; 
InrTcfg mv t cfg; 
SETUPJTCB; 

if (tcb->do_cfgj/vrts) { 
key.tag = MVCFG_KEY; 
key.mac_addr = - mv- > mac_addn 
key.vlanjd = mv->vlanjd; 

cfg.mlid = mv->mlid; 

wdb_send_store_noack(&key, sizeof(key), &cfg, slzeof(cfg), 
WDB VERS, WDB PRI); 

} 



lm_crt_cfg(key, Wen, cfg, den) 
lmjcfg_key_t *key; 
int Wen; 
tU!NT8 *cfg; 
Int den; 

{ 

switch (key->tag) { 
case NULL_CFG_KEY: 

break* 
case GLBL_CFG KEY: 

lmj:rt_glbl_cfg(key, cfg); 

break; 
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caseVLAN CFG KEY: 
Im^crt^vtan^cFgOcey. cfg); 

DioaK; 

case PORT_CFG_KEY: 
[m_crt_port cfg(key, cfg); 
break; 

case MACCFG KEY: 

lm_crt_mac cfg(key, cfg); 
break; 
case VC CFG KEY: 

lm cit_vc^cfg(key f cfg); 
break; 

case PV CFG KEY: 

[m crt_pvjfg(key, cfg); 
break; 

case MV_CFG KEY: 

Im^crf mv cfg (key, cfg); 

break; 
default: 

break; 

> } 

lm_crt_glbl_cfg(key, cfg) 
lm _glbJ_cfg key t *key 
'ni_cfg_glbrt *cfg; 

SETUPJTCB; 

} lm - Ch f$^ &cfg.>dflt.num^mcasts, NULL, NULL, 

lm_crt_vlan_cfg(key ( cfg) 

Jm_v!an_cfg key t *key; 
^ im_cfg_viarTt *cfg; 

Imvlan^t *vlarr 
qlinkj *Iink; 
lm_mac_vlan t *mv; 
lrn_mac~t ™ *mac 
SETUP JTCB; 
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} 

im crt^portjtfgfkey, cfg) 
lm_port_cfgJ<ey_t *key; 
lm_cfg port t *cfg; 

i 

lm_port t *port; 
SETUP JTCB; 

port = FIND PORT(tcb->port_q, &key->port_addr); 
If (port = = MULL) { 

port = add_port(&key->port addr); 

} 



lm_crt mac_cfg(key, cfg) 

I mjrnacjcfg_keyj *key; 
Im cfg_rhacft *cfg; 

{ 

lm_mac t *mac; 
SETUPJTCB; 

mac = FIND_MAC(tcb->mac q, &key->mac addr); 
rf (mac = - NULL) { 

mac = add mac(&key->mac_addr); 

} 



lm_crt_vc_cfg(key, cfg) 
!m_yc_cfg_key_t *key; 
Im cfg vc t *cfg; 

{ 

SETUP TCB; 

} 

lm_crt_pv cfg(key, cfg) 
I m_pv_cf g_key_t *key; 
Im cfg pv"t *cfg; 

{ " " " 

lm_port_ylan_t tmp; 

im_port_t *port; 

lrrfvian_t *vian; 

lm_portj/ian_t *pv; 

SETUPJTCB; 

tmp.vlan Id = key->vianjd; 
tmp.port~addr = key->port_addr; 
pv = FIND_PV(tcb->pv q, &tmp); 
if (pv = = NULL) { 



WO 94/07316 



PCT/US93/08674 



} 



Im cfg.c 

^12- 

port = add_port(&key->port_addr); 

ff (vlan o - NULL) { 

vfan - add_vlan(key->vfan Id. tcb->dflt mtu size, 
^ tab- > dfl t_num_mcasts) ; * ~ 

pv = add_pv(&key- > port_addr, key->vtanjd. cfg->mlid); 
lm_chg_pv_cfg(pv, &cfg->mUd); 

!m_crt_mv_cfg(key, cfg) 

lm_mv_cfg key t *key; 
^ Im^cfg^mvj *cfg; 

lm_mac_vian_t *mv; 
Inwnacjrtan t tmp; 
lm_mac~"t " *mac; 
Imvianl *vtan; 
SETUP JTCB; 

tmp. vfan _id = key- > vlan Jd: 
tmp.mac_addr = key- > mac addn 

^ «^T >,W - qr&tmP,: 

!Tfma = c = , = D Kruil? ( C Cb " >maC - Q ' &key " >mac - addr )= 
^ "*ac = add_mac(&key- > mac addr); 

ff (vlan = = NULL) { 

vlan = add_vlan(key->vfanjd ( tcb->dflt mtu size, 
^ tcb->dflt_num_mcasts); ~ 

mv = add_mv(&key->macaddr, key->vlan_id, cfg->mlid); 
lm_chg_mv_cfg(mv, &cfg->mlid); 
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/* lm mgmtc 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

V 

#lfdef CERNEL 

#indude "ipcjief.h" 
#include "net_def.h" 
#include <giobai def.h> 
#!nclude <driver."fi> 



#undef Imjnit 

#else /* ifndef CERNEL */ 

#include <stdint.h> 
#include <global_def.h> 
#include <ITCJf.h> 
#include <driver.h> 
#includ9 <RTJf.h> 
#include <timer.h> 
#include <RT_def.h> 
#include <enetjf.h> 
#include <net_3ef.h> 

#define ERRLOG printdbg 
#define printf printdbg 

#endrf /* ifdef CERNEL */ 

#include "unipdu.h" 
#include "nnipdus.h" 
#include "altask_gl.h" 
#include 'slgtask_gl.h" 
#include "svctaslT gl.h" 
#include "svcjf.h r 
#include "snmp ind.h" 
#include "AALjEh" 
#lnclude - q.h" 
#include "bits.h" 
#inciude "lm.h" 

extern lm_port_vlan_t *im_mgmt_find_pv(); 
extern lm_mac"viarTt *lm_mgmt_find mv(); 
extern !m_v1an_t *lm_mgmt_find_vlan(y; 
extern lm_port t *l m_mgmtJind_port Q ; 
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extern lm_mac_t *lm_mgmt find macO; 
extern lm_vcj *lm_mgmt Jindj/cQ ; 
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lm_srvcjngmt_get(msg) 
struct AgentMsg *msg; 

Int ret; 

ret = Im do mgmt get(msg, FALSE): 
return (ret); " 

} 

lm_sn/c_mgmt getnext(msg) 
struct AgentMsg *msg; 

int ret; 

ret «= lm_do_mgmt get(msg, TRUE); 
return (ret); 

} 



{ 



lmjjo_mgmt_get(msg, getnext) 
struct AgentMsg *msg; 
!nt getnext; 

Int ret; 
struct MB *mb; 
struct MBH *mbhdn 
struct AgentMsg *tx msg; 

ret = RT_SUCCESS; 
txjnsg = lm_cp_mgmt msg (msg); 
mb = &tx_msg->BodyT 
mbjidr =~&mb->head; 
mb_hdr->datoff = 0; 
switch (mb_hdr->ovcode) { 
case LM_GLBL_OVN: 

ret = lm_mgmt_get glbl(tx msg, getnext); 
break; 

case LM_ATTR_ENT_OVN: 

ret = Tmjngmt get attr ent(tx msg, getnext); 
break; - - - - - ' 
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case LM PVJDVN: 

ret = lm_mgmt_get_pv(tx_msg, get next); 

break* 

case LM ' NODE_ENT_OVN: 

ret = 7m jngmt_get_node_ent(tx_msg, getnext); 

break; ~ 
case LM_MAC_ENT_OVN: 

ret = lmjngmt_getjTTac_ent(txjnsg, getnext); 

break* 
case UuTmP_ENT OVN: 

ret = lm_mgmt2get_mp_ent(tx_msg, getnext); 

break* 

case Lm'pM ENT_OVN: 

ret = 7m jTigm^ge^pm^entCtxjnsg, getnext); 

«" break* 

caseLM'vC ENT OVN: 

ret = 7m Jhgmf get j/c_ent(tx_msg, getnext); 

break; - - 

default: 

ret « !RT_SUCCESS; 

mb_hdr->ercode = ERJ3ENERIC; 

goto err_exlt; 

break; 

ret = lm_sendjrigmtjrsp(txj-nsg); 
return (ret); ~~ ~ 

err_exit: 

lm_sendjrigmt_rsp(tx_msg) ; 

return (ret); 

} 

lm mgmt_get_glbl(msg, getnext) 
"struct AgentMsg *msg; 
int getnext; 

{ 

int ret; 
struct MB *mb; 
struct MBH *mb_hdr, 
struct OS tmpjbs; 
int num_v1ans; 
Int num_ports; 
int numjnacs; 
Int nunwnvs; 
int num_pvs; 
int num vcs; 

SETUPJ"CB; 

if (CHK_VB(LM_VB MSGS)) { 
printf( u getting globals\r\n - ); 
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} 

num_vlans = QUEUE LEN(tcb->vian q); 

num_ports = QUEUE~LEN(tcb-> port~q): 

num_macs = QUEUE~LEN(tcb->mac~q); 

num_mvs = QUEUE CEN(tcb->mv aj; 

num_pvs = QUEUE lEN(tcb->pv q); 

num_vcs = QUEUE~LEN(tcb->vc~q): 

ret = RT_SUCCESS~ 

mb ■ &msg->Body; 

mb_hdr = &mb->head; 

tmp_osJength = sizeof(tcb->nac atm addr); 

bcopy(&tcb-> nac atm addr, tmp" os. buffer, tmp osJength); 

MB_wp_OS(mb, CM NAC ADDR PIX, &tmp os) r 

tmp_osJength = sizeof(tc5.>bid~blts); 

bcopy(tcb->bld_bits, tmp o&buffer, tmp osJength); 

MB_wp OS(mb, LM BID "PIX, &tmp os)~ 

tmp_osJength = sizeof(tcb->mlId bits): 

.bcopy(tcb->rnlid_blts, tmp os.buffer. tmp osJength); 

MB wp_OS(mb. LM_MUD BITS PIX, &tmp os): 

MB wp INT(mb. LM_DFLrMTU"PIX. &tcb->dflt mtu size); 

.^-WP. NT mb. LM_DFLT_MCAST_PIX &tcb->ffflt rium mcasts): 

MB wp_INT(mb, LM_NUM VLANS PIX, &num vlanl): ~ 

MB wp_INT(mb. LM NUM'MACS PIX, &num macs); 

MB wp INT(mb, LM_NUM;poRTS" PIX &num" ports); 

MB wpJNTOiib. LM NUM MVS PR. &num mvs); 

MB wpJNT(mb, LM NUM~PVS*PIX &num"pvs); 

MB_wp_INT(mb, LM~NUM"VCS"P1X &num vcs • 
return (ret); - - - _ /. 

err_exit: 
return (ret); 

} 



lm_mgmt_get attr ent(msg, getnext) 
struct AgeritMsg *msg; 
Int getnext; 

int ret; 

struct MB *mb; 

struct MBH *mb hdr; 

struct LM_ATTR ENT IDX *idx; 

Im vlan t *vian; ~ 

struct OS tmp_os; 

struct LM ATTR ENTJDX tmpjdx; 

' nt num_macs; 

Int num ports; 

SETUP_TCB; ~ 
ret = RTSUCCESS; 
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mb = &rnsg->Body; 
mb hdr = &mb->head; 

idx~= (struct LM_ATTR ENTJDX *) mb_hdr->hd; 
vian = lm mgmt find_vian(ldx); 
if (vian - m NULL) { 
if (getnext) { 

vian = lm mgmt findnext vian(Ux); 

If (vtan « NULQ { 
ret - IRT SUCCESS; 
mb hdr->ercode = ER_NOSUCHNAME; 

goto err exit; 

} 

y sis© { 

ret « IRT SUCCESS; 

mb hdr-^ercode - ER_NOSUCHNAME; 

goto err exit; T . 

} 

if (CHK VB(LM VBJWSGS)) { ' ■ 

printff getting stats on vian %d\r\n', vian->vlanjd); 

num macs = QUEUE L£N(vlan->mv_q); 
nunTports - QUEUEl^N(vian->pv_C|); 

lm_cvt_vian_idx(&vlan->vlanjd ( &tmpjdx); 

lm *ctf tt^SSnp IcbtLM VLAN, LM NUM_EL£M(tmpjdx.LM_VLAN), &tmp_os); 
MBj/vp_05(rnb, LMJ/LAfsfPIX, &tmp_os); 

tmp_os.length = stilen (vian- > v1an_name) ; 
bcopy(vtan->vian name, tmp_os.buffer, tmp_os.length); 
MB_wp_OS(rnb, LM_VLAN_NAME_PIX, &tmp_os); 

MB wp INT(mb, LM NUM MCAST_PiX, &v1an->num_mcasts); 
MB~wp"lNT(mb, LM~MTU~SIZE PIX, Avian- >mtu_slze); 
MB~wp~lNT(mb, LM MUD" PlX^vtan->dflt mlid); 
MB~wp INT(mb. LM""ATTR""NUM PORTS fHX &num_ports); 
MB~wp~!NT(mb, LM^ATTRlNUM^MACSjPlX, &num_macs); 

tmp osJength = sizeof(vtan-> mid I bits); 
bcopy(vtan->mid bits, tmp os.buffer, tmp_os:length); 
MB_wp_OS(mb t Qrf_MlD_eiTS_PlX &tmp_os); 

return (ret); 

err_exit; 
Teturn (ret); 

} 

lm_mgmt_get_pv(msg« getnext) 
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{ 



staict AgentMsg *msg; 
Int getnext; 

int ret; 
struct MB *mb; 
struct MBH *mb hdr; 
struct LM PV IDX *7dx; ' 
struct LM~P\T IDX tmp Idx; 
lm jDort vTan 1 *pv; " 
struct G5 ~ tmp os; 
SETUPJTCB; 

ret = RT_SUCCESS; 

mb - &msg->Body; 

mb hdr = &mb->head; 

idx~= (struct LM_PVJDX *) mbhdr->fld; 

pv = lm mgmt find pvfidx): 

lf (pv=r NUL q { - p 

if (getnext) { 

pv = lm_mgmt findnext pvfidx): 
if (pv NULQ { 

ret « IRTSUCCESS; 

mb_hdr->ercode = ER NOSUCHNAME* 

goto err_exit; 

} else { 

ret = !RT_SUCCESS; 
mb_hdr->ercode = ER GENERIC; 
goto err exit; 

} 

} 

if (CHKVB(LM VB_MSGS)) { 

printf ("getting stats on pv = \r\n"): 
print pv(pv, 0); 

} 

lm_cvt pv idx(pv f &tmp idx); 
*idx = tmp idx; 

MB wpJlsrT(mb f LMJPV SHELF PIX, &tmp idx.LM PV SHELF)- 
MB wp INT(mb, LMlPVlCARD PlX, B^T^m^^P' 

M^- ^ m ^ LM.PV^PORT:pIX &tmp idx.l^>V-pORT). 
MB_wp INT(nib t LM PV MUD PIX, &pv->7nHd)- " ~ 1 

" ^^ P -^^ W - VLAN ' ^ NU M^^M(tmp_idx^PV^VLAN), 

MBj*p_OS(mb, LM PV VLAN PIX &tmp os); 
return (ret); ~ ~ - r - " 

err_exft: 
return (ret); 
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lm_mgmt get node ent(msg, getnext) 
struct AgentMsg ^msg; 
Int getnext; 

{ 

int ret; 
struct MB *mb; 
struct MBH *mb hdn 
SETUPJTCB; 

ret = RT SUCCESS; 
mb = &msg->Body; 
mb hdr = &mb->head; 



print tcb(tcb, 0); 
ret =T|RT SUCCESS; 
mb_hdr->ercode = ER_GENERIC; 
goto err_exlt; ~ 

return (ret); 

err_exit: 

return (ret); 

} 

I m_mg mt_g et_mac_e nt (msg , getnext) 
struct AgentMsg *msg; 
int getnext; 

i 

int ret; 
struct MB *mb; 
struct MBH *mb_hdr; 
struct LM MAC_ENTJDX *idx; 
struct LM~MAC_ENTJDX tmpjdx; 
lm_mac_vlan_t tmp_mv; 
im_mac~addr_t mac_addr; 
lm_mac vlan t *mv; 
struct dS tmp_os; 
SETUPJTCB; 

ret = RT_SUCCESS; 
mb = &msg->Body; 
mb hdr = &mb->head; 

idx"= (struct LM_MAC_ENT IDX *) mbhdr->fld; 
mv = Im mgmt 7ind_mv(idxy; 
if (mv = = NULQ { 
if (getnext) { 

mv = Im mgmt findnext_mv(idx); 

K(mv"NULQ{ 
ret = !RT SUCCESS; 



u MMM iimn mi 
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mb_hdr->ercode = ER NOSUCHNAME; 
goto err exit; 

} 

} else { 

ret = IRT_SUCCESS; 
mb_hdr->ercode = ER GENERIC; 
goto err_exit; 

} } 

If (CHKjra(LM_VB_MSGS)) { 
prlntfCgetting stats on mv = 
print_mv(mv f 0); 

lm_cvt_mv ldx(mv, &tmp Idx); 
*idx « tmp" Idx; 

im - M -^^fJ^^J^0yUW, L^^NUM^EI^MftmpJdxLM^AMC^VLAN), 
M B_wp_OS(mb, UAJAACyiANJPlX, &tmp_os); 

MB wp_0S(mb, LM MAC ADDR PIX, &tmp os)- 
re^Fe^ 5, ^>^UD>IX ( &mv.>mlW); 

err_exit: 
return (ret); 

lm_mgmt_get mp_ent(msg, getnext) 
struct AgentMsg *msg; 
int getnext; 

int ret; 
struct MB *mb; 
struct MBH *mb hdr; 
struct LM MP ENTlDX *idx; 
struct LM~MP~ENT~IDX tmp ' Idx; 
lm_mac_addr t mac_addr;~ 
Imjnacjt "~*mac; 
lm_port3 *port; 
lm^port~addr_t port addr; 
struct 05 tmp os; 
int shelf; " 

>t . slot; 

Int : port_num; 
int nunrTvlans; 
SETUP JTCB; ~ 

ret = RT_SUCCESS; 
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mb = &msg->Body; 
mb hdr = &rnb->head; 
idx = (struct LM_M PJE NT J DX *) mbhdr->Hd; 
mac = lm mgmt find mac (idx); 
If (mac = = NULL) { " 
if (getnext) { 

mac = lm mgmt findnext mac (Idx); 
H (mac = = NULCJ { 
ret = !RT SUCCESS; 
mb_hdr-:Tercode = ER_NOSUCHNAME; 

goto err exit; 

} 

} else { 

ret = !RT SUCCESS; 
mb_hdr->ercode = ER_GENERlC; 
goto err exit; 

} 

} 

If (CHKVB(LM VB MSGS)) { 

printf< M gettlng stats on mac = %s\r\n\ 
sprint_mac_addr(&mac- > mac_addr)) ; 

num^vians - Q UEU E_LE N (mac- > mv_q); 

Imj:vt_macjdx(&mac->mac_addr. &tmpjdx); 
*idx = tmp idx; 

lm_cvtjdxJbs(tmpJdx.LM_MP_MAC, LM_NUM_ELEM(tmpJdx.LM_MP_MAC), 

&tmp_os); ~ ~~ 
MB_wp_OS(mb. LM_MP_MAC_PIX &tmp_os); 

LM_CLR PORT ADDR(&port_addr); 
If (mac->port != NULL) { 
port = mac- > port; 

LMJNIT PORT_ADDR(&port_addr, tcb->myjiode, 
pbrt->port_addr.aa_shelf +1, 
port->port_addr.aa_siot + 1, 
port- > port addr.aa~port + 1); 

> 

shelf = port_addr.aa_shelf; 

slot = port_addr.aa_ilot; 
port_num = port_addr.aa_port; 

MB wp INT(mb. LM MP SHELF PIX, &shelf): 

M B~wp~l NT (mb, LM~MP~CARD PlX, &s!ot); 

MB wp~INT(mb, LM_MP_PORT~PIX, &portjnum); 

M B~wp~l NT(mb, LM_M P_N U M_V LAN S PIX, &num_vtans); 

tmp os.length = sizeof(mac->mlld blts^; 

bcopy(mac->mlid_bfts, tmp os.buffer, tmp osJength); 

MB wp OS(mb, LM MP MQD^BITSJ 5 !* £tmp_os); 
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return (ret); 

err_exit: 
return (ret); 

} 

lm_mgmt_get vc_ent(msg, getnext) 
struct AgentMsg *msg; 
tat getnext; 

int ret; 
struct MB *mb; 
struct MBH *mb hdn 
struct LM VC_ENTlDX *idx; 
struct U/TVC ENT'lDX tmp idx; 
lm_vc_addr_t~ vc~addn ~ 
lm_vc t *vc; " 
struct OS tmp os* 
SETUP_TCB; 

ret = RTSUCCESS; 
mb - &msg->Body; 
mbjidr = &mb->head; 
idx = (struct LM VC EMT IDX *) mb hdr->iid* 
vc = Inwngmt find vc(idx); 
if (vc == NULL) { " 
if (getnext) { 

vc = lm_mgmt findnext vc(idx); 

rf(vc-=NULQ{ 

ret = !RT SUCCESS; 

mb_hdr->ercode = ERNOSUCHNAME; 
goto err exit; 

} 

} else { 

ret = IRT_SUCCESS; 
mb_hdr->ercode = ERJ3ENERIC; 
goto err exit; 

} 

} 

if (CHK_VB(LMVB MSGS)) { 

printf ("getting stats on vc - %s\r\n", 
sprintjrc_addr(&vc->vc_addr)); 

Im cvt_vcjdx(&vc->vc addr, &tmp idx); 
*idx = tmpjdx; " ~ ' 

lm ^vt^osam P Jdx 

MB_wp_OS(mb, LM_VC_VLAN^PIX f &tmp_os); 

lm_cvtjdx_os(tmpJdx.LM_VC_MAC, LM_NUM_ELEM(tmp_idxLM_VC_MAC), 
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&tmp os); 

MB_wp_OS(mb, LMyCJAACJPlX, &tmp_os); 

MB wp INT(mb, LM VC_REF CNT PIX, &vc->ref cnt); 
MB_wpJNT(mb, LM~VC_BID JPIX, £vc->bid); 
return (Fet); ~ 

err_exit: 
return (ret); 

} 

Im mgmt_get pm_ent(msg, getnext) 
"struct AgentMsg *msg; 



int getnext; 

int ret; : 

struct MB *mb; 



struct MBH *mb hdn 
struct LM_PM_ENT J DX *idx; 
struct LM_PM_ENTJDX tmpjdx; 
lmjnac_addr_t rriac_addr; ~ 
lm_mac~t *mac; 
lm_port_t *port; 
im_port_addr_t port_addn 
struct OS tmpjDs; 
int shelf; 
int slot; 
int portjium; 
int nunrTylans; 
SETUPJTCB; 

ret - RT_SUCCESS; 
mb = &rnsg->Body; 
mb hdr = &mb->head; 
idx~= (struct LM PM_ENT IDX *) mb_hdr->iid; 
port = Im mgmffindjDorfi[idx); 
if (port = = NULL) { 
if (getnext) { 

port = Im mgmt findnext port(idx); 
if (port = = NULL) { 
ret - IRT SUCCESS; 
mb hdr->ercode = ER_NOSUCHNAME; 
goto err exit; 

} 

} else { 

ret = IRT SUCCESS; 
mb_hdr->ercode = ER_GENERIC; 
goto err exit; 

> 
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nurnvlans « QUEUE_LEN(port->pv_q); 

If (CHK_VB (LM_VB MSGS)) { 

printf ("getting stats on port %s\r\n B , 

sprint_port_addr(&port->port_addr)); 

lm cvt_port^ldx(&port.> port addr, &tmp Idx); 
*idx = tmp Idx; " - 

port addr = port->port addr; 
LM_CLR_MAC ADDR(&rhac addr); 
if (port->mac H= NULL) { " 

mac = port- > mac; 

mac_addr = mac->mac_addr; 

shelf = port_addr.aa shelf + 1; 

slot = port_Iddr.aa slot + 1; 

port_num = port_a3dr.aa port + 1; 

MB wpJNT(mb, LM PM "SHELF PIX, &sheff); 

MB_wpjNT(mb, LM~PM~CARD PIX, Aslot); 

MB wp INT(mb, LMlPMlPORrPIX, &port num); 

MB_wpJNT (mb, LM_PM NUM VLANS P»C&num vlans)- 

tmp_os.length = sizeof(mac addr) -2;~ " 

bcopy((char *) &mac__addr + 2, tmp os.buffer. tmp osJength)- 

MB_wpj3S(mb, LM_PM_MAC PIX, &mp os); * ien 8»V. 

tmp_os.length = sLzeof(port->mlid bits); ~ 

b<^py(port.>mJid^bfts, tmp_os.buffer, tmp osJength); 

MB wpOSfmb, LM PM MUD BITS PIX, &tmp os): 

return (ret); " - K - 

err_exit: 

return (ret); 

} 

lm_sn/c_mgmt_validate(msg) 
struct AgentMsg *msg; 

■ 

int ret; 
struct MB *mb; 
struct MBH *mb_hdr; 
struct AgentMsg *tx_msg; 

ret = RT_SUCCESS; 
tx msg = !m_cp_mgmt msg(msg); 
mb = &tx_msg- > Body;"" 
mb_hdr =T&mb->head; 

switch (mb_hdr->ovcode) { ~ ^ 

case LM_GLBL_OVN: 

ret = Immgmt val glbl(tx msg); 
break; *" *" ~ 

case LM ATTR ENT OVN: 



{ 
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ret « lm_mgmt_yal_attr_ent(tx_msg) ; 
break' 
case LM^PV OVN: 

ret = lmjmgmt_val_pv(tx_msg); 
break* 

case LM* NODE ENT OVN: 

ret = Tm^mgrnt^val^node^entCtx^msg); 

break* 

case LMJAAC ENT_OVN: 

ret = lm_mgmt_val_mac_ent(tx_msg) ; 

break* 
case LMlMP_ENT OVN: 

ret = lm_mgmt_val_mp_ent(tx_msg); 

break* 

case LM^PM^ENT OVN: 

ret = Im^mgmt^vai^pm^entttx^msg); 

break* 
case LM ' VC_ENT OVN: 

ret » Tm_mgmfva!_vc_ent(tx_msg); 

break; 
default: 

ret = !RT_SUCCESS; 
mb_hdr->ercode = ER_GENERIC; 
goto err_exit; 
break; 

ret = lm_sendjiigmtj , sp(txjrnsg); 
return (ret); 

err_exit: 

I m_send_mg mt j*s p (tx_msg) ; 

return (ret); 

} 

Im mgmt_vaJ_attr_ent(msg) 
"struct AgentMsg *msg; 



{ 



Int ret; 
struct MB *mb; 
struct MBH *mb_hdr; 
struct LM_ATTR ENTJDX *ldx; 
lm_vlan t *vian; 
Im viarOdJ vlan Id; 
tl)fNT32 mtujske; 
tUINT32 nummcasts; 
tUINT8 * got_mtu_s'rze; 
tUINT8 got_num mcasts; 

SETUPJTCB; 

a 

I 

ret = RT SUCCESS; 



/&3 
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nib = &msg->Body; 

mbjidr = &mb->head; 

mtiTsIze = num mcasts = -1; 

Wx = (struct LM~ATTR ENT IDX *) mb hdr->lid; 

vlan = lm mgmt find vfanfldx): 

if (vlan == NULJlJ { ~ 

} else { 

got_numjncasts = MB dop(mb, LM NUM MCAST PIX); 
got_rntu_size = MB_dop(mb. LM MTU SI2E PIX); ~ 
num mcasts = got num mcasts? ~~ ~ 

MB_cpJNT(mb,"LM KTUM MCAST PIX, &num mcasts) 
mtusize « got mtu_s5e ? " ~ " 

MB_cpJNT(mb, LMJWTUSIZEJ>IX. &mtu_size) : -1; 

} 

return (ret); 

errexit: 
return (ret): 

} 

I m_mgmt_val_pv(msg) 
struct AgentMsg *msg; 

Int ret; 
struct MB *mb; 
struct MBH *mb hdr; 
struct LM_PVJDX *7dx; 
im port vlan 1 *pv; 
SETUPTCBf 

ret = RT_SUCCESS; 

mb - &msg->Body; 

mb hdr = &mb->head; 

idx~= (struct LM_PV IDX *) mb hdr->iid- 

pv = lm_mgmt_findjDv(idx); ~ 

ff (pv = = NULL) { 
return (ret); 

err_exfc 
return (ret); 

} 

lm_mgmt_vaJ_node_ent(msg) 
struct AgentMsg *msg; 

Int ret; 
struct MB *mb; 
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struct MBH *mb hdr, 
SETUPJTCB; 

ret = RT_SUCCESS; 
mb = &msg->Body; 
mbjidr = &mb->head; 

ret = IRT SUCCESS; 
mb_hdr->ercode = ERJ3ENERIC; 
goto err_exit; 

return (ret); 

err_exit: 

return (ret); 

} 

lm_mgmt_val_mac_ent(msg) 
struct AgentMsg *msg; 

int ret; 
struct MB *mb; 
struct MBH *mb_hdn 
tm_mac_v1an_t *mv; 
SETUP JTCBf 

ret m RT_SUCCESS; 
mb = &msg->Body; 
mb_hdr = &mb->head; 

return (ret); 

err_exit: 

return (ret); 

} 

lm mgmt_val_g!bl(msg) 
"struct AgentMsg *msg; 

{ 

int ret; 
SETUPJTCB; 

ret = RT_SUCCESS; 
return (ret); 

} 

lm mgmt val_mp_ent(msg) 
"struct AgentMsg *msg; 

{ 

Int ret; 
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struct MB *mb; 
struct MBH *mb hdr; 
struct LM MP ENTlDX *ldx; 
struct LM~MP~ENTlDX tmp Idx; 
lm_mac_addr~t mac addr;~ 
lm_macj ~*mac; " 
lm_porM *port; 
lm_porTaddr t port addr; 
struct OS "tmp ds; 
Int shelf; ~ 

Int slot; 
Int port num; 

SETUPJTCB; " 

ret = RT_SUCCESS; 

mb = &msg->Body; 

mb hdr = &mb->head; 

idx = (struct LM_MP_ENT IDX *) mb hdr->fld; 

mac = lm mgmt find macfidx); 

If (mac = = NULL) { " 

} else { 

return (ret); 

errexit: 
return (ret); 



lm_mgmt_val pm_ent(msg) 
struct AgentMsg *msg; 

int ret; 
struct MB *mb; 
struct MBH *mb hdr; 
struct LM PM_ENT*~IDX*ldx- 
struct LM~PM_ENTJDX tmp ' idx; 
lm_mac_addr~t mac addr;" 
Inwnacjt "~*mac; " 
lm_port_t *port; 
lm_porfaddr t port addr; 
struct dS "tmp 6s; 
Int shelf; " 

Int slot; 
ln t port num; 

SETUPJTCB; " 

ret = RTSUCCESS; 
mb = &msg->Body; 
mb_hdr = &mb->head; 
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tdx = (struct LM_PM_ENT IDX*) mbhdr->lid; 
port ~ lm mgmt find" portfldx); 
tf (port « NULL} { ~ 
} else { 

} 

return (ret); 

err_exit: 
return (ret); 



struct MB *mb; 
struct MBH *mb hdr; 
struct LM_VC_ENTlDX *idx; 
struct LM_VC ENTJDX tmpjdx; 
lm vc addr t vc_addr, 
InTvcTt ~ *vc; "~ 
struct OS tmp os; 
SETUP_TCB; 

ret = RT_SUCCESS; 

mb = &msg->Body; 

mb hdr = &mb->head; 

i<jx~~= (struct LMJVC ENT IDX *) mbjidr->iid; 

vc = lm mgmt find vc(tdx); 

if (vc - = NULL} { " 

} else { 

} 

return (ret); 

err_exit: 
return (ret); 

} 

lm_srvc mgmtcommit(msg) 
struct AgentMsg *msg; 

{ 

Int ret; 
struct MB *mb; 
struct MBH *mb hdn 
struct AgentMsg *t>T msg; 

ret = RT SUCCESS; 

tx_msg = lm_cp mgmt_msg(msg); 

mb = &tx msg- > Body; 

mb hdr =T&mb->head; 



lmjTigmt_va]_vc_ent(msg) 



"struct AgentMsg *msg; 
{ 



Int ret; 
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switch (mb hdr->ovcode) { 
case LM GLBL OVN: 

ret = Tm_mgmt cmt glblftx msg); 
break; " "~ 

case LM^ATTR ENT OVN: 

ret = Tm_mgmt_cmt attr ent(tx msg); 
break; *~ ~ 

break; 
case LM_PVOVN: 

ret = im mgmt cmt pv(tx msg); 
break; ~ " — 

case LM_NODE_ENT OVN: 

ret = Tm_mgmt_cmt node entftx msg); 
break; ~ ~ ~ 

case LM_MAC_ENT_OVN: 

ret = Imjngmt cmt mac ent(tx msg); 

break; ~ " - 

case LM MP_ENT_OVN: 

ret = 7mjngmt cmt mp ent(tx msg): 
break; - - - - 

case LM PM_ENT_OVN: 

ret =7m_mgmrcmt pm ent(tx msg); 
break; ~ " ~ - 

case UM_VC_ENT_OVN: 

ret = lm_mgmt_cmt vc entftx msg); 
break; " " ~ 

default: 

ret = !RT_SUCCESS; 
mbJidr->ercode = ER GENERIC- 
goto err_exit; 
break; 

} 

ret = im_send mgmt rsp(tx msa): 
return (ret); " ~ yy ' 

err_exit: 

Im_send mgmt rsp(tx msg); 
return (ret); " 

lm_mgmt_crnt glbl(msg) 
struct AgeritMsg *msg; 



{ 



•nt ret; 

Int |- 

struct MB ' *mb* 

struct MBH *mb hdn 

struct OS tmp os; ' 

tUINT32 *dffl~mtu size; 

tUINT32 *dflt_num~ mcasts; 
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tATMADDR *nac addr; 

bits t *bid bfrsf 

bits~t *m!id bits; 

tUlf?T32 dflfmtu size a; 

tUINT32 dflt numjncasts_a; 

tATMADDR nac addr_a; 

bits t bid blts~a[SIZE_BID BITS]; 

blts^t mliJ bits_a[SIZE_MlJD BITS]; 

SETUPJTCB; 

ret = RT_SUCCESS; 
mb = &msg->Body: 
mb_hdr = &mb->head; 

dflt mtu size = dflt num_mcasts = nac_addr = 

Bid bits = mild Bits = NULL; 
if (MB"dop(mb. LM NAC ADDR_PIX)) { 

MB'cp OS(mb,lM MAC ADDRJPIX, &tmp_os); 
if (tmp os.length ! =~sizedf(nac acidrjfl) { 
ret « !RT SUCCESS; 
mb_hdr->ercode = ERJ5ENERIC; 
goto err_exit; 

bcopy(tmp_os. buffer, &nac_addr_a. si2eof(nac_addr_a)); 
nac_addr = &nac_addr_a; 

\ (MB dop(mb t LM_BID PIX)) { 

bzero(bid bits a, sizebf(bid_bits_a)): 
MB_cp_OS(mb, LM BID PIX, &tmp os); 
if (tmp os.length > sizeof(bid_bits_a)) { 

ret = !RT SUCCESS; 

mb_hdr->ercode = ER_GENERIC; 

goto err_exit; 

bcopy(tmp os.buffer, bid_bits_a, tmp_os.length); 
bidjaits = "&bidj>its_a; 

I (MB dop(mb, LM DFLT MTU_PIX)) { ' 
MB"" cp INT(mb,lM DFLT_MTU_PIX, &dfltjntu_size_a); 

dfltjntu^size = &dflt jnt u3" ae JS 

I (MB dop(mb, LM DFLT MCASTJMX)) { 

MB" cp INT(mb,TM DFLT^MCAST^PIX, ftdflrnum^mcasts^a); 

dftt^num^mcasts = "8tdflt_num_mcasts_a; 

I (MB_dop(mb t LM_MUD BITS PIX)) { 
bzero(m!id bits a, sizeof(mlici_btts a)); 
MB_cp_OS"(mb7LM_MUD BITS PlX &tmp_os); 
if (tmp os.length > sizeoffalid Bits_a)) { 

ret = IRT SUCCESS; 

mb hdr-^ercode = ERJ3ENERIC; 
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goto err exit; 



bcopy(tmp ^.buffer miidj^a, tmp osJength); 
^ mlid_brts = &mJid_btea; 

,m - ch 9 7 g^g(dfiL^^ dfltjiumjncasts, nacaddr, bldjrts. 
return (retf; 

err_exit: 
return (ret); 

} 

lm_mgmt_cnrrtattr ent(msg) 
struct AgeritMsg"*msg; 

*nt ret; 

int tmp ret; 

Int a rf 

struct MB ~*mb; 

struct MBH *mb hdr 

struct LM_ATTR EtiT IDX *idx: 

qlinkj *!i n K; " 

fm_mac_t *mac; 

lm_mac~vtan_t *mv; 

im_vlan_t *vlan; 

lm_vJan id J vfan id; 

tUINT32" " *mtu~size; 

tU!NT32 *num" mcasts; 

tUINT32 *dflt ffiiid; 

char *vfan[name; 

tUINT32 mtu_size_a; 

tUINT32 num mcasts a; 

tUINT32 dflt_m!id_a; ~ 

char vlanJhame^afLM MAX VLAN NAME]- 

int vian_name len; ■ ~ " " 

struct OS tmp osr 

in* chngdf 

SETUP_TCB; 

ret = RT_SUCCESS; 
chngd = FALSE; 
mb = &msg->Body; 
mbjidr = &mb->head; 

a - r = MB_cmpJx(mb, LM_VLAN_PIX, LMJ/LANJXO, LMVLAN IXL); 
dflt_m!id = num_mcasts = mtusize - vfanname = NULL; 
num_mcasts_a = tcb- > dfit_num_mcasts; 
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mtu size a = tcb->dflt_mtu_slze; 
dfltjmlid Ja - LM_MAX_MUD; 
tmp os.length = 3; 

bcopyCbob", tmp_os.buffer, tmp os.!ength); 
If (MB <Jop(mb, LM MUD PIX)) \ 

MBlcpJNT(mbrLM MUD PIX, &dfltjnllda): 

dflt_mlid = &dlltjnll3 - a; 

\ (MB dop(mb. LM NUM JtfCAST_PIX)) { 

MBlcpJNT(mb ( TM_NUM_MCAST^PIX ^umjncastsja). 

num mcasts *» &num mcasts_ a; 

} 

If (MB dop(mb. LM MTU SIZE_PIX)) { . 
MB^cpjr^(mbr^MtU.SlZE_PlX, &mtu_size_a); 

mtu_size = &mtu_s»ze_a;~ 

I (MB dop(mb, LM VLAN NAME_PIX)) { 

MB~cp_OS(mb,lM VLAN NAME_PIX, &tmp_os); 
if (tmp_os.length > sizeoffaan_name_a) - 1) { 
tmp_os.length = sizeof(vlan_name_a) - 1 ; 

> 

viarwiame = &vtan_name_a; 

bcopy(tmp_os.buffer, vian_name_a, tmp_osJength); 
vlan_name_a[tmp_os.length] = 0; 

idx = (struct LM_ATTR_ENT_IDX *) mb_hdr->iid; 

vlan = lm mgmt find vtan(idx); 

If (vlan = = NULL && a r = = MB IXP_CREATE) { 

lm cvt idxj/ian(idx->LM VLAfi, &vtanjd); 

vlan =~add_v1an(v1an Jd, 7ntu_size_a, numjncastsa, 
vlan name a); _ w w _ _ 

} else If (vlanl = NULL && a_r = = MBJXP_DELETE) { 

vianjd = vlan- > vlan Jd; 

free vlan(vtan); 

viari~= NULL; 

if (vlan I m NULL) { _ _ . 

Im_chg vian cfg(vian, dfltjnlid, num_mcasts, mtu^s&e, 

vlan nlme); 

} 

If (vtan I = NULL) { 
print_v!an(vian, 0); 

printfOried to add vlan %d, a r = %d\r\n", vianjd, a_j); 
return (ret); 

err_exit: 
return (ret); 

} 
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lm_mgmt_cmt_pv(rnsg) 
struct AgentMsg *msg; 

Int ret; 
Int an 
struct MB ~*mb; 
struct MBH *mb Mr, 
struct LM_PV IDX fldx; 
Im_port_f~ "*port; 
lm_vlan_t *vtan; 
lm_port~addr t port addr; 
Im vJarTidj " vlan Id; 
tUINT32~ *mlidr 
tUINT32 mlid a; 
Im_port vlan t *pvf 
SETUPJ-CBf 

ret = RT_SUCCESS; 
mb = &msg*>Body; 
mb hdr = &mb->head; 
mlid" = NULL; 

&f -* {SfflSrt^^yKH? LM - PV - VlAN - K °' ^ PV.VUNJXL); 

pv = Im mgmt flndj}v(idx); ~ 

if (pv = = NULT&& a_r == MB IXP CREATE) { 

port ="P|NB _PORT(tcb->port q. &port addr); 
vlan = FlND>LAN(tcb.>vlan q. vlan id); 
if (port == NULL) { 

port = add_port(&port_addr); 

if (vlan = = NULL) { 

vlan = add_vlan(vlan_ld. tcb->dflt mtu size, 
tcb->dflt_num_7ncasts); ~ ~ 

tf V (pv ^-SuSST-^ 6 '' Vlan - id ' v,an ->dflt_mlid); 
ret = IRT SUCCESS; 

mb_hdr->ercod9 = ER GENERIC: 
goto err exit; 

} 

} else if (py 1= NULL && a r = = MB IXP DELETE) f 

free_pv(pv); ~ - - ' 1 

pv = NULL 

} 

if (pv != NULL) { 

if (MB_dop(mb. LM_PV_MUD PIX)) { 

MB_cpJNT(mb, LM PV MUD PIX, &mlid a)- 
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mlid = &mlid a; 

} 

} else { 

ret = !RT SUCCESS; 
mb_hdr->ercode = ER_GENER1C; 
goto err exit; 

} 

If (pv i = NULL) { 

lm_chg pv cfg(pv, mild); 

} 

return (ret); 

err_exlt: 
return (ret); 

} 

lm mgmt_cmt node_ent(msg) 
"struct AgeritMsg *msg; 

{ 

int ret; 
struct MB *mb; 
struct MBH *mb hdr; 
SETUPJTCB; 

ret - RT_SUCCESS; 
mb = &msg->Body; 
mbjidr = &mb->head; 

ret - !RT SUCCESS; 

mb hdr->ercode = ERJ3ENERIC; 

goto err_exlt; 

return (ret); 

« 

err_exit: 
return (ret); 

} 

lm_mgmt_cmt_mac_ent(msg) 
struct AgeritMsg "*msg; 

{ 

Int ret; . 

Int an /* add/remove flag */ 

struct LM_MAC ENTJDX tmpjdx; 

struct MB *mb; 

struct MBH *mb_hdr; : ■ 

struct LM_MAC_ENTJDX *ldx; 

lm mac addrjT mac_addn 

I nrfvlanjdj vlanjd ; 

tUlNT32 *mlid; 
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tUINT32 mlid a; 
lm_mac_vlan_t *mv; 
lm__mac_t " *mac; 
lm~portjt *port; 
lnrTvfan"~t *vlan* 
SETUP TCB; 

ret = RT_SUCCESS; 
mb = &msg->Body; 
mb_hdr = &mb->head; 
mac = NULL; 
mlid = NULL; 

idx = (struct LMJ/IAC ENT IDX *) mb hdr->iid; 

a - r = MB ^mpXmb, LM^MAC_VLAN~PlX LM^MAC^VLANJXO, LM_MACJ/LAN IXL); 

mv = lm_mgmt_find_mv(Jdx); 

if (mv == NULL && a r = = MB IXP CREATE) { 

J m_cvt jdx_mac (&ldx- > LM MAC ADDR, &mac addrt- 

I m_cvt Jdx_via n (&Idx- > LM "MAC "VL^N, Avian Td)- 

mac = FIN D_MAC (tcb- > mac q.~~&mac addri" 

vfan = FIND VLAN(tcb->vlari"q I vlan 0); 

if (mac = = fiULL) { 

mac = add_mac(&mac_addr); 

if (vlan = = NULL) { 

vlan = addj/ian(vtan Id, tcb->dflt mtu size. 
^ tcb- > dfit_numjTi casts) ; 

l JTo ^/ add r m ^f? a ^ addr ' vtan - ld ' L** ^ MID, vian->dfit mlid)- 
} else tf (mv 1 = NULL a r = = MB IXP" DELETE) V un L m "% 

mac = mv->mac; ~ "* 

free_mv(mv); 

mv = NULL; 

if (mv ! = NULL) { 
mac = mv->mac; 

if (MB_dop(mb, LM MAC MUD PIX)) { 
if (mac = « NULL) { " 
ret = IRTSUCCESS; 
mb_hdr->ercode = ER GENERIC- 
goto en_exrt; 

MB cp _INT(mb, LM_MAC MUD PIX. &mlid a); 
^ mlid = &mljd_a; - " 

} else { 

ret = IRT_SUCCESS; 

mb_hdr->ercode = ER GENERIC; 
goto err exit; 

} 
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ff (mv l= NULL) { 

lm chg mv cfg(mv, mlid); 

} 

return (ret); 

err_exit: 
Teturn (ret); 

} 

lm mgmt_cmt_vc_ent(msg) 
"struct AgentMsg *msg; 

{ 

Int ret; 
struct MB *mb; 
struct MBH *mb_hdr; 
struct LM VC_ENTJDX *idx; 
struct LM_VC_ENTJDX tmpjdx; 

lmj/c_addr_t vcja ddr . 
Im_vc_t *vc; ~ 
lm_bid_t *bid; 
tUINT32 *ref cnt; 
lm_bid_t bid a; 
tUINT32 reTcrt_a; 
struct OS tmp os; 
SETUPJTCB; 

ret = RT_SUCCESS; 
mb = &msg->Body; 
mb_hdr « &mb->head; 
bid = ret cnt = NULL; 

idx = (struct LM_VC_ENT IDX *) mb_hdr->iid; 
vc = lm_mgmt find_vc(idx); 
if (vc = = NULL) { " 

ret = !RT_SUCCESS; 

mb_hdr->ercode = ER_GENERIC; 

goto err_exit; 

lmjMj/cJdx(&vc->vc_addn &tmpjdx); 
*idx = tmo idx* 

lm_cvt ldx_os(tmpJdx.lJrf_VC_VLAN, LM_NUM_ELEM (tmp_ldx.LM_VC_VL^N) , 

~&tmp os) ; ~ 
if (MB dop(mb. LM VC REF CNT PIX)) { 

M B~ cpj NT (mb.XM JVC_ffEF_CNT_P IX, &ref_cnt_a) ; 

ref_cnt = &ref_cnt_a; 

if (MB dop(mb, LM VC BID_PIX)) { 

MB~cp INT(mb,~LM"VC BID PIX, &bid_a); 

bid = £bid_a; 
lm_chg_vc_cfg(vc, bid. ref_cnt); 
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return (ret); 

err_exit: 
return (ret); 

} 

lm_mgmt_cmt pm_ent(msg) 
struct XgeritMsg *msg; 

Int ret; 

struct MB *mb; 

struct MBH *mb hdn 

struct LM PM ENTlDX *ldx* 

struct LM_PM~ENTJDX tmp'idx; 

lm_mac_addr_t mac_addr_a; 

lm_mac addr~t *mac addr; 

bltsj " *m!id bitsf 

bltsj mlidjbits a[SIZE MUD BfTSI; 

lm_port_t *port; ~ - J 

lm_port addrjt port addr; 

struct dS tmp 6s; 

SETUPJTCB; 

ret = RT_SUCCESS; 
mb = &msg->Body; 
mb_hdr = &mb->head; 
mac_addr = mlid_bits = NULL; 
Idx = (struct LM PM ENT IDX *) mb hdr-> fid- 
port = lm_mgmt find" portTldx) : " 
if (port = = NULL) { ~ 

ret = !RT_SUCCESS; 

mb_hdr->ercode = ER GENERIC; 

goto err exit; 

} 

if (MBjjop(mb, LM_PM MAC PIX)) { 
LM_CLR MAC ADDR(&mac addr a)- 
MB_cp 0S(m6; LM_PM MAC Pl£ &tmp os); 

+ * tmp^length); 

» (MB_dop(mb, LM PM MUD BITS PIX)) / 

MB_cp_OS(mb, IM_PM MDD BITS PIX. &tmp os); 
bcopy(5np_os.buffer, mlid bits~a, tmp osJenrtfi): 
mlid bits = &mlld bits a; " " ■ 

} ~ ~ 

if (port 1= NULL) { 

lm_chg_port_cfg(port, mac_addr, mild_blts); 
return (ret); 
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err_exh: 
return (ret); 

} 

lm_mgmt_cmt_mp_ent(rnsg) 
struct AgentMsg *msg; 

{ 

int ret; 

Int aj\ /* add/remove flag */ 

struct MB *mb; 
struct MBH *mb hdn 
struct LM MP^ENTlDX *ldx; 
struct LftTMP ENTJDX tmpjdx; 
lm_mac_addr_t mac_addr t 

Im mac~t ~*mac; ; 

Inrf portl *port; 

bits t " *mlid bits; 

bitsj mHdJ)itsji[SIZE_MLlDBlTS]; 

im port addr_t portjiddr; 

struct dS tmp_os; 

int shelf; 

int slot; 

int port num; 

SETUPJTCB; 

ret = RT^SUCCESS; 
mb = &msg->Body; 
mb hdr = &mb->head; 
mlid bits = NULL; 

idx « (struct LM MP ENT IDX *) mb_hdr->iid; 

a_r = MB_cmp_bc(mE, LM'MP MACjPIX, \JAJAPJAACJXO, LM_MP_MACJXL); 
mac = Im mgmt find mac(idxj; 
if (mac = = NULL && a_r = = MBJXP_CREATE) { 
Im cvtJdx_mac(&idx->LM MPJMC, &mac_addr); 
mac = add_mac (&mac_add r) ; ~ 
if (mac == NULL) { 
ret = !RT_SUCCESS; 
rnb_hdr->ercode ■ ER_GENERIC; 
goto err_exit; 

} 

} (mac I = NULL && a_r == MBJXPJDELETE) { 
free_mac(mac); 
mac = NULL; 

} 

. if (mac! = NULL) { 

if (MB dop(mb, LM MP MUD BITS_PIX)) { 

MB~cp OS(mb, LM_MP MDDBITS_PIX. &tmp os); 
bcdpy(tmp_os.buffer, mfid bits_a, tmp_os.length); 
mlid bits = &mlid bits_a;~ 
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> 

} 

If (mac l= NULL) { 

lm_chg_mac_cfg(mac, mlldjjlts); 

return (ret); 

err_exlt: 
Tetum (ret); 

> 

struct AgentMsg * 
lm_cp_mgmt_msg(msg) 
struct AgentMsg *msg; 

struct AgentMsg *ret 
int msgjen; 

msgjen = msg->Hdr.Length + ITSZ; 

!f G (ret L St ^NUL?r tMS9 ReqMsgMern2er °( ms 9J en )l 
goto err_exit; 

bcopy(msg, ret, msg ten); 
return (ret); 

err exit: 

"&rash(993 t 0, 0); 

lm_vc_t * 
lm~mgmt_find_vc(ldx) 
struct LM_PVJDX *idx; 

lm_vc_addr_t tmp vc; 
lm~vlan_t *vlan; ~ 
!m_vc_t *ret; 
SETUPJTCB; 

ret = NULL; 

inrrcvtjdxvcfldx, &tmp vc); 

■ftta " n SoHh (tct " > " v,an - q ' trap - vc - vten - ,d )= 

ret = FIND_VC(vlan->vc_q, &tmp_vc); 
return (ret); 



} 



lm_port_vlan_t 
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lm mgmt find_pv(ldx) 
"struct tM PV IDX *Ux; 

{ 

Im port_v1an_t tmp_pv; 
lm~port_y1an_t *ret; 
SEfUP_TCBr 

Im^cvtjdxjDvfldx, &tmp_pv); 

ret = FiND_PV(tct»pv_q ( &tmp_pv); 

return (ret); 



Im mac_vian_t * 
Inrf mgmt find mv(idx) 
"struct LM_MAC_ENT IDX *idx; 

{ 

lm_mac_ylan_t *ret; 
lm_mac_vlan_t tmp_mv; 
lnrTmac_v1an_t *mv; 
SETUPJTCB; 

lm_cvtjdx mv(idx, &tmp_mv); 

ret = FIND~MV(tcb->mv_q, &tmp_mv); 

return (ret); 



lm_mac_t * 
Im mgmt findmacfldx) 
""struct LM_M PJE NT J DX *idx; 

{ 

Inwnac t *ret; 
lm_mac~addr_t mac_addn 
SETUPJTCB; 

im_cvt jdx_mac(idx- > LM MP_MAC, &mac addr); 
ret = FlNDJWAC(tcb->mac_q. &macaddr7; 
return (ret); 



lm_port_t * 
Im mgmt find_port(idx) 
"struct LM_PM_ENT IDX *idx; 

{ 

lm_port_t *ret; 
lm_port_addr_t port_addn 
SETUP_TCB; 

Im cvtJdxjJort(&idx->UY1_PM SHELF, &port_addr); 
ref= FIND_PORT(tcb->portj}7&port_addr); 
return (ret); 
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lm_v!an_t * 

Im mgmt find vlan(ldx) 

^ struct UAjJTRJENTJDX *Idx; 

lm_vfan_t *ret; 

InrTvlanTd t vlan Id* 
Int" |; 

SETUPJTCB; 

l Z-™a^^& m> ^ VLAN. &vfan Id); 
ret = AND VUN(tcb.>vTan q, vlan ldj; 
return (ret); " - ' 

} 

lm_vc_t * 
lm_mgmt_flndnext_vc(ldx) 
struct LMJ/C^ENTJDX *idx; 

lm_vc_addr t tmp vc; 
lm_vc~t ~" *ret; ~ 
lm~vtan t *vlarr 
SETUPJTCB; 

ret - NULL; 

lm_cvtjdx vc(Idx f &tmp vc); 

f^Oufi^^ t-P.vcvlan.U); 
ret = FINDNEXT^CCvlan^vc.q. &tmp_vc); 
if (ret = = NULL) { 

ITS^^**-^-** tmp.vcvfenjd).- 
ret = RNDNEXT_VC(vlan->vc_q, &tmp_vc); 

} 

return (ret); 



} 



lm_port_v1an t * 
lm_mgmt findnext pv(ldx) 
struct LM_PVJDX »idx; 

lm_port_vtan t tmppv; 
Im port~vlan~t Vet; 

serupjrcB" 



lm_cvtjdx_pv(idx, &tmp pv); 

ret = FINDNEXr_PV(tcb-->p V _ q , &tmp_pv) : 
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return (ret); 

} 

lm mac_vlan_t * 
im""mgmt_findnext mv(Wx) 
"struct LM_MAC~ENT IDX *ldx; 

i 

lm_mac_vtan_t *ret; 
lm mac~vtan~t tmpjnv; 
lm~mac_addrt macjaddn 
lnrfYnac""vlan~t *mv; 
SETUPjTCBf 

lm cvt_idx_mv(idx, &tmp mv); 

ref= FINDNEDCT_MV(tcb->mv_q, &tmpjnv); 

return (ret); " 



lm_mac_t * 
lm mgmt findnext_mac(idx) 
"struct LM MP ENTJDX *ldx; 

{ 

lm_mac_t *ret; 
lm_mac_addr_t mac addr; 
SETUP_TCB; 

lm cvt idx mac(idx->LM MP MAC, &mac_addr); 
ref= FiNDN EXT_MAC(tc5- > macjq, &mac_addr); 
return (ret); 

} 

lm port_t * 
lm""mgmt_findnext port(idx) 
"struct LM_PM_ENT IDX *idx; 

{ 

lm_port t *ret; 

lm port""addr t port addr, 

SETUPJTCB" 

lm cvt Idx port(&idx->LM PM SHELF, &port_addr); 
ref= FINDNEXT_PORT(tc&>pbrt_q, &port_addr); 
return (ret); 

} 

lm_vian_t * 

lm mgmt_findnextj/ian(idx) 

struct LM ATTR ENfT IDX *ldx; 

{ ~ 

lm v1an_t *ret; 

Inrfvlan Id t vtan id; 
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int |; 
SETUPTCB; 



{ 



lm_cvt jdx vlan(ldx->LM VLAN, &vlan Id); 
SLmfr«?? JEXT - VLAN(ta> * >V,an - q ' vi " an - ,d): 

) 

lm_cvt_mv_ldx(mv. idx) 
lm mac vtan_t *mv; 
struct LM_MAC_ENT_IDX *idx; 

bzerofldx, sbeof(*idx)); 

lm_cvt mac_idx(&mv- > mac addr, idx->LM MAC ADDR)- 
I m_cvt_vfanjdx(&mv- > vlanTd , Idx- > Uv1_MAC_VLAN) ; 

lm_cvt_pv_ldx(pv 1 Idx) 
Im port vfan t *pv; 
struct LM_PV_IDX *idx; 

bzerofldx, slzeof(*idx)); 

dx-> LM PVTCARD = pv->port addr.aa slot + 1- 
^ x ->LM T PV T PORT - pv->port:addr.aa-port + 1; 
Im_cvt_vtan_idx(&pv- > vlan_id. idx->LM_PV_VLAN); 

lrn_cvt_portJdx(port addr. Idx) 
lm_port addr t *pbrt addr; 
struct LKl_Pfkf ENTJBX *idx; 

bzeropdx, sizeof(*ldx)); 

Ktfu-22-S!?Sf = P°"_addr->aa shelf + 1; 
dx->LM_PM_CARD = port addr->aa slot + 1- 
ldx->LM_PM_PORT = porTaddr^aajjort + 1; 

lm_cvt_vc_ldx(vc addr, Idx) 
lm_vc_addr t~*vc addn 
struct LM_VC_ENTJDX *idx; 

bzerofldx. sizeof(*ldx)); 

lm_cvt_mac_fdx(&vc_addr->mac addr. Idx->I_M VC MAO- 
lm_cvt_vlan_idx(&vc_addr- > vlanjd, idx->LM_V(J_VLAN); 

lm_cvt_mac_ldx(mac. Idx) 
Im mac addr t *mac; 



{ 



} 




WO 94/07316 



lm mgmt.c 

"-145- 

struct LM_MP ENTJDX *idx; 

{ 

Int I; 
bzerofldx, sizeof(*idx)); 

for fi = ATM FIRST MAC: I < steeofflm macaddrj); { 
ldx->LM MP MAC[! - ATM FIRST MAC] = mac->aa_byte[i]; 

} 

} 

lm cvt_vian ldx(vlan Id, idx) 
lm vlan Id t *vlan_id; 
struct LM *TTR_ENT IDX *ldx; 

{ 

bzero(!dx, sizeof(*idx)); 

ldx->LM VLAN[LM VLAN IXL - 1] = *vtanjd; 

} 

/**/ 

lm cvt idx_mv(idx, mv) 
"struct LM MAC_ENTJDX *idx; 
!m_mac_vlan_t "*mv; 

{ lm cvt idx mac(idx-> LM_MAC_ADDR f &mv->macaddr); 
Irrf cvTidx~vtan Odx- > LM MACVLAN, &mv->v1anjd); 

} 

lm cvt_idx_pv(idx, pv) 
"struct LM_PVJDX *idx; 
lm_port_vianl *pv; 

{ lm cvt idx port(&idx- > LM_PV_SHELF, &pv- > port addr) ; 
lm~cvtjdx"vlan(idx-> LM_PV_VLAN, &pv-> vlanjd); 

} 

lm cvt idx vc(idx, vc addr) 
"struct LM VC_ENT IDX *idx; 
lm_vc_addr_t *vc~addn 

* lm cvt idx mac(idx->LM VC MAC, &vc addr->mac_addr); 
Im^cvtHdx^vianfdx^LM^C^VLAN, &vcjiddr->vtanjd); 

} 

lm cvt idx port(idx, port) 

"struct LM_PM_ENTJDX *kix; 
lm_port_addr t *port; 

{ 

SETUP TCB; 
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LMJNIT PORT_ADDR(port, tcb->my node, ldx->LM PM SHELF - 1 
} Idx^LM^PM^CARD - 1, Ux->lM_PM_PORT ~1); " 



lm_cvtjdx_mac(ldx, mac) 

struct LMJWP_ENT IDX *idx; 
^ lm_mac_addr_t *mac; 

Int |; 

LM CLR MAC_ADDR(mac); 

for 0 = AtMJ=IRST_MAC; i < sizeofflm mac addr t): / 
mac->aaj)yte[f} = idx- > LM_MP_MACp - ATMjPlRST_MACJ ; 

} 

ImjMjdx vfanfldx, vlan Id) 
struct LMATTR ENT IDX *idx; 
lm_vtanjd_t *vianjd; 

} *vtanjd = idx->LM_VLAN[LM_VLANJXL - 1]; 

Im^cvtjdx^osfldx, len, os) 
u short *ldx* 
irit len; 
struct OS *os; 

Int i; 

os- > length = len; 

for (i = 0; i < len; { 

^ os->buffer[i] = idx[i]; 

} 
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/* lm util.c 

* COPYRIGHT 1992 ADAPTIVE CORPORATION 

* ALL RIGHTS RESERVED 

* Description: 

* < Description of the general category of file contents > 

* Routines: 

* < An OPTIONAL list summarizing the routines In this file> 
******************************* END*************************** 

#Kdef CERNEL 

#include "ipc def.h' 
#indude 'netrdef.h' 
#include < global def.h> 
#indude <driver.Ti> 

#undef Imjnit 

#e!se /* Ifndef CERNEL */ 

#indude <stdinth> 
#lnclude <ITC_if.h> 
#include <RTJf.h> 
#include <global_def.h> 
#indude <driver.h> 
#include <timer.h> 
#include <RT_def.h> 
#indude <enetjf.h> 
#inciude <net_def.h> 
#include <NAC_shared_def.h> 

#define ERRLOG printdbg 
#define printf printdbg 

#endtf /* ifdef CERNEL */ 

#indude 'unipduh' 
#inciude "nnlpdus.h" 
#indude "altask_gl.h" 
#indude "sigtask_gl.h m 
#indude "svctaslTgLh" 
#lndude "svcjf.h~ 
#indude 'snmpjnd.h" 
#lndude "AALJf.h' 
#indude ■wdbjf.h" 
#include "q.h" 
#lndude "bits.h" 
#include 'Im.h" 
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static char hexdlgfl = l '0123456789abcdeP; 
lm_es_cfg_resp t * 

lm buiid_es^cfg~ resp(mac, enq, resp len) 
lm mac_t *mac; ~ 
tCFGELEM *enq; 
W *respjen; 
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{ 

lm_es_cfg resp_t *ret; 
InT retjen; 
In* num paddrs: 

tPORT CFGELEft *paddn 
qllnkT *link; 
im_rfTac_vlan_t *mv; 
lm_port_t *port; 
struct aim addr port addr 
Int ~i; - 

int mlid; 
SETUPJTCB; 

ret = NULL; 
retjen = 0; 

if (CHKJ/B(UW_VB MSGS)) { 

printffSendlng es_cfg resp msg to mac %s\r\n" 
spnnt_mac - addr^&mac->mac_addr)); 

port = mac- > port; 
num_paddrs = -1; 
if (port ! - NULL) { 

f0r m!? k = HEAD - Q (™c->mv -q ); link |. NULL; link = link->next) I 
mv = flnwnacvfan t *) link- > data- ' 1 

mlid = mv->mlid; ~ 

nurn_paddrs - (num_paddrs <- mlid) ? mild : Hum padSs; 

} 

num_paddrs+ + ; 

ret len = SIZE LM ES CFG RESP + 

(num_paddrs - i) * slzeofftPORT_CFGELEM) ; 

ret = (lm_es cfg resp t *) 

ReqMsgMem2ero(ret len); 
If (ret - = NULL) 

goto err_exft; 
bzero(ret, ret len); 

BUILD UNI flDRm(&r^->lmI hdr. NNI PROTOCOL, NN PDU STATUS rf*p 
STATUS^CONFiG, LMI GCOBAL CREF ™ p ™VJ>TAJUSJiESP. 
LMI GLOBAL CREF VALUE)* " ~ 
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ret->enq = *enq; 

port addr = part->port_addr; 

padcfr = ret->paddn 

for (i - 0; I < numpaddrs; { 
paddr[il.af type = LMI_PORT_ADDR; 
paddrfij.arport = port_addr; 
paddrfij.af^portaajannum « I; 

} 

link = HEAD Q(mac->mv q); 

for Oink - HEAD Q(mac->mv q); Unk != NULL; link = llnk->next) { 
mv = (Imjnac vianj *) link- > data; 
mlid = mv->mfid; 

paddr[mlid].af_type = LMI_PORT_ADDR; 
paddr[mlld].af mid = mv->mid; 
if (mv->vlan == NULL) { 

paddr[mlid].afjncasts ■ 0; 

paddr[mlidj.af_rntu - 0; 
} else { 

paddr[miid].af mcasts = mv->v1arv>num_mcasts; 
paddr(mlid].armtu = mv->vtan->mtu si2e; 

} 

paddr[mlid].afjx>rt - port_addr; 
paddr[mlid].af portaajannum - mv->mlid; 

} 

*respjen = ret Jen; 

return (ret); ( 

err_exit: 

*resp_len = 0; 
return (ret); 

> 

lm_send_mgmt_rsp(rnsg) 
struct AgentMsg *msg; 

{ 

int ret; 
SETUP _TCB; 

if (CHK_VB(LM VB_MSGS)) { 
printf ("sending a mgmt rsp\r\n"); 

ret = SendProxyMsg(msg, msg->Body.headmbsize, 
SNMPA_MGMT_GETRESP); 

return (ret); 

} 

lm_send svc_rel__req(lm*Lhdr, cause) . 
iLMlriDR *lml hdn 
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tUINT32 cause; 

Int ret; 
struct svcff *msg; 
tUINT32 msg len; 
tREL^REQ *ref"req; 
tUINTe *rel cause; 
tLMJHDR *tx Imi hdr; 
tITC HEADER *Ttc;" 
SETOPJTCB; 

if (CHKVB(LMJ/BJASGS)) { 

printfCsending a"svc re! req msg, cause is %d\r\n" 
cause); " " " x x 1 

} 

ret = RT SUCCESS; 

msg Jen ~= SVCIF PDU_OFFSET + steeof(*rel req)- 
msg = (struct svcTf *) ReqMsgMemZero(msg fen); ' 
if (msg == NULL) { ~ ' 

ret = !RT_SUCCESS; 

goto err exit; 

} 

^ req = (tREL_REQ *) & msg->lmi hdr; 

txjmi_hdr = &re! req- > imi hdr; 

*tx J mijidr = *lm7 hdn ~ 

tx lmi_hdr->lh_pdu type = SDU RELEASE REQ- 

rfiT 0 ?^ Z (tU,NT * *> & re< 'eq~>lmi cause; ' 

LMI ADD JELEMENT (rel cause. LMI RlLEASE CAUSE, cause)- 

ret = impend svc msgfrnsg, msg Ten); " 

return (ret); " " - 

err_exit: 

return (ret); 

lm_send svc msg(itc, len) 
tiTC HEADER *itc; 
tUINT32 len; 

{ 

Int ret; 
SETUP JTCB; 

if (CHK_VB(LM VB MSGS)) { 
Printffsending a"svc msg\r\n"); 

BUILD ITCH((*itc), len - IAS2, T1D SVC, 0. EX REQUEST 
TAAALJND RECEIVE, tcb->mytid); CA -" tUUt5T ' 
ret = SendMsgptcJ; 
return (ret); 
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lm_send_alan_cfg(prefix, atm_hdr, slot_num. active jaorts. num_paddrs, paddrs) 
lm_prefix_t prefix; 
lm_atm_hdr t atm hdn 
tUINTS " slot num; 
tU!NT32 active ports; 
UJINT32 numjiaddrs; 
tATMADDR *paddrs; 



{ 



lm_alan_cfgjresp_t *resp; 

inf" ret; 

Int resp len; 

int I; 

SETUPJTCB; 

if (CHK VB(LM VB MSGS)) { . . . ... 

printf ("send In aTan cfg msg, prefix = Ox%x, atinhdr = Ox%x\r\n , prefix, atm_hdr), 
printf ("\tslot num =~%d, act_ports » %d, num^paddrs %d\r\n , 
slot_num, acth/e_portsrnum_paddrs); 

respjen = SIZE_LM_ALAN_CFG_RESP + (num_paddrs - 1) * sizeof (tATMADDR); 

resp = (lm_alan cfg_resp_t *) ReqMsgMemZero(respJen f 0); 

if (resp - = NULL) { 
ret = IRT_SUCCESS; 
goto err_exit; 

/* Fill in the NNSTATUS RESP fields */ Klkl _ eTAT1 ie 0 _ cp 

BUILD UNI HDRm(&resp->lml hdr. NNI PROTOCOL, NN_PDU_STATUS_RESP, 
" LMf STATUS CONFIG7LMI GLOBAL CREF_TYPE, 
UVirGLOBALCREF_VALUE) ; 

/* Fill in the ALANCFG_ENQ fields */ 

resp->enq.elem_type = ALAN_CFG_ENQ; 
resp->enq.sloti<T= slot_num; 

/* Fill In the ALANCFG_RESP fields */ 

resp->resp.elemjtype ALAN_CFG_RESP; 

resp- > respective ports - active DOrts; 

resp- >resp.nac iff = tct^>nacjfl; . 

ATM ADDR C(5PY(resp->resp.nac addr, tcb->nac_atm_addr); 

resp^ resp.num paddr = numjaaddrs; 

for (i = 0; i < num_paddrs; I++) 

ATM_ADDR_COPY(resp->resp.paddrs[i], paddrs[ij); 

ret = AAL DataSendNR(&tcb->my aal key, resp, respjen, 

*((tUINT32 *) & prefix), *((tUINT32 *) & atm_hdr)); 
return (ret); 
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err^exft: 

If (resp ! = NULL) 

FreeMem(resp); 
return (ret); 

lm_send_es_cfgjnd(mac) 
^ lm_mac_t " *mac; 

Int ret; 
lm_port_t *port; 
IrrTprefbcj prefix; 
Im atm hdr t atm hdr; 
tCFGELEM " enqT 
lm_es_cfg_resp t *resp; 
jnt resp len; 

tUINT32 tx~she!f; 
tUINT32 tx^slot; 
tUINT32 tx~port; 
tUINT32 tx vci; 
SETUPJTCB; " 

rf (CHKJ/B(LM_VB MSGS)) { 

printfrsending es_cfgjnd to mac %s\r\n". 
sprint_mac_addr7&mac->mac addr))'; 

ret = RT_SUCCESS; 

port = mac- > port; 
rf (port = = NULL) { 

ret = IRT SUCCESS; 

goto err_exit; 

bzero(&enq, sizeof(enq)); 
be shelf = port->port_addr.aa shelf; 
tx_sJot = port->port_addr.aa slot- 
fcport = port->port addr.aa"port; 

tx.vc, - SHE^LO-T_PORrTO_VC«m(NN.S,Q.va, tc_she.f, bc.slot, 

enq.afjype = LM1 CONFIG ENQ- 
enq.af_version = LM1 VERSION; ' 
enq.af_my_address =~mac->mac addr; 
fgi L m r b N U ^ *enq, &respjen); 

goto err exit; 

} 

SsP->lnii type_spec = LMI STATUS IND- 
BU LD ATM_HDR(&atm hdrTtx vol); " 
BUILO_UCAST_PREFlX(aprefix,Xshelf, tx_sfot. tx_port); 
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ret = lm_send_es_cfg_resp(prefix, atmjidr. resp, respjen); 
return (ret); 

* 

err exit: 
Teturn (ret); 

} 

lm send^es^cfg^resptprefix, atmjidr, resp, respjen) 
lm prefix J prefix; 
lm~atm_hdr t atmjidr; 
lm es cfg_resp t *resp; 

{ 

!nt ret; 
SETUPJTCB; 

If (CHK VB(LM VB MSGS)) { ^ _ v . „ 

printfCsending es_cfg_resp, prefix = Ox%x, atmjidr = ox%x\r\n 
prefix, atm_hdr); 

\ (resp = = NULL) { 
goto err_exit; 

ret - AAL DataSendNR(&tcb->my_aal key, resp, respjen, 

*((tUINT32 *) & prefix), *((tUINT32 *) & atmjidr)); 
return (ret); 

err exit: 

1 (CHKVB(LM_VB ERRS)) { 

printf( u Couldn t t send a null aal msg\n"); 

} 

return (-1); 

} 

send mcast cfgO 
{ 

Int ret; 

} 

Imjcb t * 
lm initfi 

{ 

Imjcb t *ret; 

Int " err cod6; 

tUINT32 I; 

int lm_crt_cfgO; 

struct wdb_msg *wmsg; 
lm_glbl_cfgj<eyjt key; 

ret = (Imjcbj *) malloc(SIZE LMJCB); 
If (ret = = NULL) 
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goto errjsxit; 



SetQlobaIP(ret); 
bzero(ret, sizeof(Vet)); 
ret- > cur bid ■ 0; 

ret->my~node - MHW GetNodeNumberO; 
ret->my_shelf = MHWlSetShelfNumberO; 
ret->my_slat = MHVVjBetSlotldO; 
bzero(&ret->port tmplt, si2eof(ret->port tmplt)); 
ret->pGrtjmpiLaa type = AAT PORT* " 
ret->port_tmpfLaa"country = USA; 
ret- > portjmpit aa~node = ret- > my node- 
ret^ port_tmpitaa~sheIf = ret-> my "shelf; 
ret->tmr blk - Timerlnft(l); 

^ JN ^ ret->my^node. ret->m yj3 helf, 

ret->dflt_mtu s£e = LM DFLTMTU SIZE* 
ret->dflt nunwncasts =~LM DFLT NUM MCASTS* 
ret->ver5ose - LM_VB_ALLT ~ 

ret->mac_q = &ret->mac queue; 
ret->port_q = &ret-> port "queue; 
ret->vfan_q = &ret->vfan""queue; 
ret->my_q = &ret->mv queue; 
ret->pv_q = &ret->pv queue; 
ret->vc_q = &ret->vcjqueue; 
init_q(ret->mac q); 
init_q(ret->port q); 

infc_q(ret->vlarrq); 
init_q (ret- >mv q); 

init_q(ret->pvjq); 

in it_q (ret- > vc_q) ; 

/* throw away the Oth bid. as per jib's recommedation */ 
bits_get_brt(ret-> bid jDits, SIZE_BID_BITS) ; 

err.cod, -J&gJfi^ltmjB. LM.END.VC, IMJM._ m 
#ifdefUNIX r ~ - y; ' 

GetTid(&ret->mytid); 
#else /• jf def UND( * / 

ret->mytld.Generic = TID LM- 
ret->mytld.lnstance = LM INSTANCE; 

GetPid(&ret-> mypid); 

ret->do_cfg_wrts = TRUE; 

key.tag = GI_BL_CFG_KEY; 

wmsg = wdb_send_fetch_wait(&key, sizeof(key)); 
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lf (wmsg = = NULL 1 1 wd b_get_ercod e(wmsg) I = 0) { 

lm_kludge_data JnitO : 
} else { 

ret- > do cfg_wrts = FALSE; 

wdb_send startup queries(lm_crt_cfg); 

ret->do_cfg_wrts S TRUE; 

SendProxyCheckln(MHW_GetCardTypeO. MHVVJaetStotldO); 
return (ret); 

err exit: 

Teturn (NULL); 

} 

lm mac_t * 
add_mac(mac addr) 

lm mac ad*dr t *mac addr; 
{ " - 

lm_rnac_t *ret; 
qlink_t *link; 
Im_mac_t *tmp; 
SETUPJTCB; 

if (CHK VB(LM VB_TERSE)) { ■ 
prinffCadding mac addr %s\r\n". sprint_mac_addr(mac_addr)) t 

mac addr->aa_type = AAT MAC; 
ret = FIND_MAC(tcb- > mac~q, macaddr); 
if (ret != NULL) 
return (ret); 

ret = (lm mac J *) mailoc(S!ZE LM MAC); 
if (ret = = NULL) 
goto err_exit; 

bzero(ret, SIZE_LM_MAC); 
ret->mac_addr = *mac_addr, 
ret->mac_addr.aa type~= AAT_MAC; 

ret-> port = NULLf 
ret->mv_q = &ret->mv_queue; 

init_q(ret->mv_q); 
init^qlinkf&ret^macjink. ret); 

ATCH MAC_MV_Q(tcb->mv_q, ret); 

PUTCTSORTED MAC(&ret->mac_link, tcb->mac_q); • 

lm__wrt mac_cfglret, NULL); 

return fret); 

err exit: 

Crash(999. 0, 0); 
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} 

lm_port_t * 
add_port(port_addr) 

lmj)ort_addrj *port_addr; 

Im port t *ret; 
SETUPjTCB; 

port_addr->aa type = AAT PORT; 
port_addr- > aa~country = USA; 

if (CHKJ/B(LM_VB TERSE)) { 

■ printf(-adding port %s\r\n", sprint j)ortjtddr(port_addr)); 

?iret fl N N0[8 OT(tCb " >pOrt - q ' P ° rt - addr); 
return (ret); 

ret = (lm_port_t *) maJloc(SI2E LM PORT); 
If (ret == NULL) ~ ~ " 

goto en_exit; 

b2ero(ret, SIZE LM_PORT); 
ret->port_addr~= *port addr; 
ret->port_addr.aa type~= AAT PORT; 
ret->port~addr.aa~lannum = 0; 
ret->mac~= NULt; 
ret->pv_q = &ret->pv queue; 
init q(ret->pv q); 
init qlink(&ret">portJink, ret); 

ATCHJ>ORT PVQ(tcb->pv q f ret); 

PI/TQJ30RTED PORT(&ret->port link, tcb->port q); 
lm_wrt port cfgTret); " p - M/i 

return T r &y.~ 

errexit: 

Crash(998. 0, 0); 

lm vfan_t * 

ada_vian(vlanjd, mtu, num mcasts, name) 
Imj/ianjd t vlan id; " 
|nt mtu; " ^ 

int numjncasts; * - - H 

char *name; 

Imj/tan t *ret; 
int ~ i ; 
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SETUP TCB; 



If (CHK VB(LM VB TERSE)) { 

printf( M adding vlan %d. mtu = %d, numjncasts - %d, name = ^s\r\n , 
vlanjd, mtu, numjncasts, name); 

ret = FINDJ/LAN(tcb->vlan_q, vlanjd); 
If (ret ! = NULL) 
return (ret); 

ret = (lm_ylan t *) malloc(SI2E LM VLAN); 
If (ret - = NULL) 
goto err_exit; 

bzero(ret. S1ZEJJAJ/LAN); 
ret- > vlanjd =» vlanjd; 
ret- > mtu "size = mtu; 
ret->num mcasts = 0; 
ret->dfltjTilid = LM_MAX_MUD; 
strcpy(ret->vlan_name, name); 
ret->mv_q = &ret->mv_queue; 
ret->pv q * &ret«>pv_queue; 
ret->vc~q = &ret->vc_queue; 
ret->free_vc_q = &ret->free_vc_queue; 
init q(ret->mv_q); 
init~q(ret->pv q); 

inirq(ret->vc"q); 
Init q(ret«>free vc_q); 
iniTqlink(&ret->vlanJink, ret); 

chg_num_vcs(ret, num_mcasts); 

ATCH^VLAN^MV^Q^cb^mv^q. ret); 

ATCH VLAN PV Q(tcb->pv q, ret); 

PUTCf SORTED VLAN (&ret- > vlan Jink, tcb->vlan_q); 

lmj:hgj/ianjrfg(ret, &ret->dfitjTilid ( NULL, NULL, NULL); 

return (ret); " 

err exit: 

*Drash(997, 0, 0); 

} 

Imj/cj * 
getjree_vc(vlan) 
Im vlan J *vlan; 

Im_vcj *ret; 
qiinkj *link; 

ret - NULL; 
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link = HEAD Q(vlan->free vc a): 
if (link == NDLL) - 
goto err_exft; 

ret = 0m vc t *) link->data; 
rmq(Iink)f "* 

PUTQ_SORTED VCflink, vlan->vc q); 
return (ret); " - 

err exit: 

Tetum (NULL); 

im_vc_t * 
add_vc(vc_addr) 

,m _ v c_addr_t *vc addr; 

lm_vc_t *ret; 
Invvian t *vlan- 
SETUP TCB; 

if (CHK VB(LM VBJTERSE)) { 

printFfadding vc %s\r\rV\ sprint^addr(vc_addr)); 

ret « NULL; 

ifc ^^^^ vc_addr->vian.ld,; 
goto err_exit; 

ru u N ^ (v,an - >vc - q ' vc - addr > ; 

return (ret); 

ret = get free vc(vian); 
if (ret = = NULL) 
goto err_exit; 

ret->vc_addr = *vc addr; 
ret->ref cnt = 0; ~ 
return (ret); 

err exit: 

return (NULL); 

chg_nurnvcs(vlan f num vcs) 
lm_vlan_t *vlan; " 
tlNT32 num_vcs; 
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int ret; 

int delta; 

Int i; 

qlinkj *llnk; 

qlinkj *next; 
lm vc t *vc; 

Int"" " onvc_q; 

ret = 0; 

delta = num_vcs - v1arv>num_mcasts; 

If (delta < Of { 

on vc q = FALSE; 
link =THEAD Q(vian->free_vc_q): 
for (i = 0; i > delta; H { 
If (imk = = NULL) { 
if (onj/cjj) 
break* 

link = HEAD Q(vlan->vcjj); 
onvc ji = TfiUE; 

\ (link = = NULL) 

break; 
next = llnk->next; 
vc = (lmj/cj *) link- > data; 
free_vc(vc);~ 
ret-; 

link = next; 

} 

} else if (delta > 0) { 

for (i = 0; i < delta; I++) { 
addjree_vc(vlan); 

ret++; 

} 

vtan- > num jncasts = num_vcs; 
return (ret); 

} 

lm_vc_t * 
addjree_vc(vlan) 
lm vtan t *vlan; 



{ 



lm vc_t Vet; 
lnrTmac_addrJ mac addn 
InrTbldj bid; 

SETUP JTCB; 

bid = bits_get_blt(tcb->bld_blts. SEE_BID_BITS); 

if (bid = = -1) 
goto err_exit; 



^ ■ ■ 
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lf (CHK_VB(LM_VB TERSE)) { 

printffgetting a free mcast vc for vfan %s. bid = %d\r\n' 
sprintjdanjd (Avian- >vlanjd). bid); ' 

ret = (lm_ vc _t *) malioc(SI2E LM VC); 
if (ret = = NULL) ~ ~ ' 

goto err_exlt; 

bzero(ret. SIZE LM VC); 
LM_CLR_MAC_ADDR(&mac addr); 

r^ll21J-= bTd DDR(&rct " >V5 - addr ' v,an " >vlan - ld - &niac_addr); 

ret->vlan = vlan; 

init_qlink(&ret->vc link, ret); 

ffiit^qlinkf&ret^vfan link, ret); 

2SS-I °5I ED - V Cr&ret->vc link, tcb->vc q); 

RUTQ^SORTED^VC(&ret.>vianJink, vlan->Tree.vc_q); 

return (ret); 

err exit; 

"&rash(994, 0, 0); 

lm_port vlan_t * 
add pvfcortaddr, vlanjd, mlid) 
lm_port addr t *port addr; 
Imj/fanjdj ~ vfan id; 
lmjnlid_t mlidf 

im_port_vfan t tmp; 
lm_port_vlan~t *ret; 
lm__port_t ~*port; 
lrn_vian~t *vlan- 
SETUPJTCB; 

If (CHK_VB(LM_VB TERSE)) { 

Pnntf S22 n9 ^ :p JL rt T addr = %s « * an ° mlid = %d\r\n" 
spnn^port^addr^port^addr), vlanjd, mlid); X X ' 

tmp.vlan Jd = vfan id; 
tmp. port addr = *p 0 rt addr 
ret = FIND PV(tcb->pv q, &tmp); 
if (ret! = NOLL) . 
return (ret); 

T(ret ^'NUaf anJ ma,loc ( S,ZE ^PORT^VLAN); 
goto err_exit; 



{ 
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bzero(ret, S!ZE_LM_PORTJ/LAN); 
ret->port_addr = *port_addr; 
ret->vianjd = vianjd; 
ret->port~= NULL; * 
ret->vian = NULL; 
ret- > mlid = mild; 
init_qlink(&ret->pvjink # ret); 

[nit qlink(&ret->port link, ret); 
init^qlink(&ret->vtanlink t ret); 

ATCH PV VLAN Q(tcb->v1anji, ret); 
ATCH~PV~POR"r Q(tcb->port q, ret); 
PLTTCTSO"ftTED J>V(&ret- > pv Ink. tcb- > pv_q) ; 
lm_wrt pv cfg(ret); 
return JretJ; 

err_exit: 

Crash(996, 0, 0); 

} 

Imjnacj/lanJ * 

addjnv(mac addr, vianjd, mid, mlid) 
Imjnac addr t *mac_addn 
Imj/lanjdJ ""vianjd; 
int mid; 
im mlid t mlid; 



{ 



ImjnacjrtanJ tmp; 
Im macj/ian~t *ret; 
SETUPJTCB; 

if (CHK VB(LM VB TERSE)) { ..... 
prinffCadding mv, mac_addr - %s, vlan ~ %d, mid = %d, mlid = %d\r\n , 
sprint jnac addr(mac addr), vianjd, mid, mlid); 

> 

tmp.mac_addr = *mac_addr; 
tmp.vlanjd = vianjd; 
ret = FIND MV(tcb->mv q, &tmp); 
if (ret 1 = NOLL) 
return (ret); 

ret = (Im mac vlan t *) malloc(SIZE LMJMCJ/LAN); 
if (ret == NULL) 
goto err_exit; 

bzero (ret, SIZE JJtf JMC_VLAN) ; 
ret- > mac_addr~= *mac_addr, 
ret->vlanld = vianjd; 
ret->macT= NULL; 
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ret->vtan = NULL; 
ret- > mid = mid; 
ret->mlid = mlid; 
init_qlink(&ret->mv link, ret); 
init_q!ink(&ret->mac link, ret); 
inft_qlink(&ret->vlanlnk t ret); 

ATCH MV VLAN Q(tcb->vlan q, ret); 

PUTQ SORTED MV(&ret-> mv link. tcb->mv q); 
lm_chg I mv_cfg(ret, &ret->rnlidj; 
return (ret); 

err exit: 

"fcrash(995, 0, 0); 

freejcb(tcb) 

lm_tcb_t *tcb; 

ff (tcb != NULL) { 

FREE VLAN Q(tcb->vfan qV 
FREE_MACjJ(tcb->mac ~q); 
FREE PORT Q(tcb->poit q); 
FREE VC Gftcb->vc q); " 
FREE~MV Q(tcb->nw q); 
FREE_PV~Q(tcb->pv q); 

InwnTglQ cfgO; " 
free(tcb); 



} 



} 



free_mac(mac) 

^ lm_mac_t *mac; 

SETUPJTCB; 

if (mac ! = NULL) { 

if (CHKVB(LMVB TERSE)) { 

printfffreeing mac addr 4 %s\r\n*, 

sprint_mac_addr(&mac->mac addr)); 

lm_rmjnac cfg(mac); 

rmq (&mac-> macjink) ; 

FR EE_MV_Q (mac- > mv_q) ; . 

Im send_es_cfgjnd(mac); 
if (mac->port ! = NULL) { 

mac- > port- > mac = NULL; 
^ mac- > port = NULL; 



